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SECTION 1 
INTRODUCTION 


PURPOSE OF MANUAL 


The purpose of this manual is to provide a description of the Interactive BASIC System (IBASIC) as 
implemented on the Burroughs B 1000 systems. The name BASIC is an acronym for Beginners All- 
purpose Symbolic Instruction Code. BASIC was initially developed at Dartmouth College in New 
Hampshire. The American National Standards Institute (ANSI) developed a standard for BASIC using 
the original Dartmouth BASIC plus additional features. Burroughs Corporation has implemented the 
minimal BASIC language and significant extensions to BASIC according to the standard developed by 
ANSI. In this manual, the term IBASIC refers to the entire interactive system, that is, all of the pro- 
grams and files necessary to run IBASIC, while the term BASIC refers only to the BASIC language. 


The BASIC language is designed for use not only by individuals who have little previous knowledge 
of computers but also by individuals with considerable programming experience. BASIC can be used 
in educational, engineering, and scientific environments. A distinct advantage of BASIC is that the 
rules of form and grammar are easily learned. 


Burroughs IBASIC is implemented in a conversational mode: the user enters BASIC statements and 
interactive commands through a terminal to the IBASIC system, whereupon IBASIC processes the in- 
put and responds with (1) the output for the command, (2) a request for more input, or (3) a message 
informing the user of any syntax errors. Burroughs IBASIC is especially suited for the learning process 
because response is nearly immediate for many of the errors commonly made by novice programmers. 


ORGANIZATION OF MANUAL 


The organization and writing of this manual was influenced by two fundamental considerations: (1) 
that many of the users of Burroughs IBASIC would be using the BASIC language and, possibly, a 
computer for the first time, and (2) that the user base would also include experienced BASIC users 
who would need a reference manual only to describe the syntax of a particular command or statement, 
to learn the commands that comprise the interactive portion of Burroughs IBASIC, or to learn about 
a command or statement that the programmer never had the opportunity to use before. 

The organization of this manual is designed to facilitate learning and using IBASIC. 

Section | is the introduction to the manual and should be read at least once by all users. 

Section 2, entitled Beginning IBASIC, introduces the use of IBASIC. 

Sections 3 through 10 provide detailed information about BASIC language syntax. 

Sections 11 and 12 describe the IBASIC system commands and capabilities. 


Appendices A through F contain the glossary, information on how to set up IBASIC, and other techni- 
cal information that is generally beyond the interest of the average IBASIC user. 


When statements, commands, and syntax are described, the following format is used. 
1. The name of the item being described. 


2. A brief functional description. 
3. The railroad syntax and any necessary verbal description of that syntax. 
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4. The semantics, which may be omitted depending on the complexity of the item. If this section 
is omitted, the semantic description of the item is the brief functional description that follows 


the item name. 
5. Examples and explanations of the examples, if necessary. 


SYNTAX CONVENTIONS (RAILROAD DIAGRAMS) 


Railroad diagrams show how syntactically valid statements can be constructed. 


Traversing a railroad diagram from left to right, or in the direction of the arrow heads, and adhering 
to the limits illustrated by bridges will produce a syntactically valid statement. Continuation from one 
line of a diagram to another is represented by a right arrow (—) appearing at the end of the current 
line and beginning of the next line. The complete syntax diagram is terminated by a vertical bar ((). 


Items contained in broken brackets (< >) are syntactic variables which are further defined, or require 
the user to supply the requested information. Upper-case items must appear literally. Minimum abbrevi- 
ations of upper-case items are underlined. 


3 


< bridges > 
<loops > 


<optional items > 


~—— A RAILROAD DIAGRAM CONSISTS OF 


<required items > 


>—~— AND IS TERMINATED BY A VERTICAL BAR, 4 


G50051 


The following syntactically valid statements may be constructed from the above diagram: 


A RAILROAD DIAGRAM CONSISTS OF <bridges> AND IS TERMINATED BY A VERTI- 
CAL BAR. 


A RAILROAD DIAGRAM CONSISTS OF <optional-items> AND IS TERMINATED BY A 
VERTICAL BAR. 


A RAILROAD DIAGRAM CONSISTS OF <bridges>, <loops> AND IS TERMINATED BY 
A VERTICAL BAR. 


A RAILROAD DIAGRAM CONSISTS OF <optional-items>, <required-items>, <bridges>, 
<loops> AND IS TERMINATED BY A VERTICAL BAR. 
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nnn 


Required Items 
No alternate path through the railroad diagram exists for required items or required punctuation. 


E. ample: 


—— REQUIRED ITEM EE 


G50052 


Optional Items 


Items shown as a vertical list indicate that the user must make a choice of the items specified. An 
empty path through the list allows the optional item to be absent. 


Example: 


—— REQUIRED ITEM 


<optional item-1 > 


<optional item-2 > 


G50053 


The following valid statements may be constructed from the above diagram: 
REQUIRED ITEM 
REQUIRED ITEM <optional-item-1 > 


REQUIRED ITEM <optional-item-2> 
Loops 


A loop is a recurrent path through a railroad diagram and has the following general format: 


ae bridge > < return character> 
Oe ee ae ae eee 
G50054 


Example: 


1 


<optional item-2 > 


G50055 


1152105 1-3 


B 1000 Systems Interactive BASIC (IBASIC) Language Manual 
Introduction 


The following statements can be constructed from the railroad diagram in the example. 
<optional-item-1 > 
< optional-item-2 > 
< optional-item-1 >, < optional-item-1 > 
<optional-item-1 >, < optional-item-2 > 
< optional-item-2 > , < optional-item-1 > 
< optional-item-2 >, < optional-item-2 > 


A <loop> must be traversed in the direction of the arrow heads, and the limits specified by bridges 
cannot be exceeded. 


Bridges 


A bridge illustrates the minimum or maximum number of times a path may be traversed in a railroad 
diagram. 


There are two forms of <bridges>. 


a eee n is an integer which specifies the maximum 
number of times the path may be traversed. 


— Sn*\__ n is an integer which specifies the minimum 
Heenee number of times the path must be traversed. 
Example: 


? 


<optional item-1 > 
1* <optional item-2 > 


G50057 


The loop may be traversed a maximum of two times; however, the path for <optional-item-2> must 
be traversed at least one time. 


The following statements can be constructed from the railroad diagram in the example. 
<optional-item-1 > ,< optional-item-2 > 
< optional-item-2 > , < optional-item-2 > , < optional-item-1 > 


< optional-item-2 > 
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RELATED DOCUMENTATION 


The following manuals are referenced in this document: 


B 1000 Systems Command and Edit (CANDE) Language User’s Manual, form number 1090586. 
B 1000 Systems Supervisory Message Control System (SMCS) Reference Manual, form number 


1108891. 
B 1000 Systems System Software Operation Guide, Volume 2, form number 1152097. 
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SECTION 2 
BEGINNING IBASIC 


The purpose of this section of the manual is to help beginners as well as those who need a review 
of the fundamental commands in the use of IBASIC. After some introductory comments about IBA- 
SIC, this section guides the user through several examples that teach most of the fundamental com- 
mands of IBASIC. For maximum benefit, the user should have access to a terminal through which 
the commands and statements presented in this section can be entered. After the user becomes familiar 
with the commands used in this section, this manual will generally be needed only as a reference 
document. 


The easiest way to learn about IBASIC is to use it. Its use is easily learned because IBASIC “talks” 
to the user. As the user enters information to IBASIC, IBASIC tells the user whether the input is cor- 
rect by responding with the corresponding output or with an error message. This dialogue is referred 
to in this manual as “interaction.” 


Two fundamental types of instructions can be presented to IBASIC: (1) system commands, and (2) 
BASIC language commands and statements. With system commands, the user requests information 
about the program currently being written, requests that a particular interactive operation be per- 
formed, or requests other information concerning the IBASIC system. Some examples are RUN, 
MAKE, LIST, and DELETE. 


BASIC language statements and commands are instructions that are carried out by that portion of IBA- 
SIC that executes or performs specified operations of the BASIC language. BASIC statements are en- 
tered and stored for later execution (Entry mode). BASIC commands are executed immediately (Com- 
mand mode). These two modes are used in the examples in this section. They are briefly explained 
under Command Mode in this section, and are fully described in Section 11 under BASIC Commands 
and BASIC Statement Entry. Examples of BASIC language commands and/or statements are PRINT, 
READ, GOTO, and LET. 


Through entry of BASIC commands and statements, the user changes the set of data upon which the 
IBASIC system operates. This set of data is referred to as the BASIC environment. It consists of two 
parts: (1) the set of BASIC statements that make up a program and (2) the data that is stored in BA- 
SIC variables, that is, data names whose value can be changed. Many of the commands and statements 
that enable the user to operate on this environment are introduced in this section. The statements and 
commands in this section were tested on a Burroughs TD832 terminal. Output may be slightly different 
for other types of terminals. 


IBASIC USE 


The paragraphs that follow guide the user through the fundamental commands of IBASIC and teach 
some of the commands and statements from the BASIC language. When asked to enter a command, 
the user must type the command on one of the three uppermost lines of the terminal, most conveniently 
beginning in the upper left-hand corner, and then press the transmit (XMT) key. For each operation 
that the user is asked to perform, the manual explains exactly what is taking place. 


Executing IBASIC 


There are several ways to initiate execution of IBASIC. Only one method is shown in this section. A 
description of all methods is found in Appendix B. (Appendix B should be consulted in order to initial- 
ly configure IBASIC for the examples in this section as well as for normal execution. In this sec- 
tion, it is assumed that IBASIC has been configured to be executed under the Supervisory Message 
Control System (SMCS) using the SIGN ON syntax as shown in Appendix B.) 
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To start execution of IBASIC, enter the following from a terminal: 
USER <usercode>/<password> ON IBASIC 


The computer responds with several messages. The ones pertinent to IBASIC are similar to the fol- 
lowing: 


MESSAGE QUEUED FOR “IBASIC”: WAITING STARTUP 
SIGNED ON TO "IBASIC”, SIGNAL = * 

Bi000 BASIC MARK 10.0.01 (04/16/81 13:20) 
(<usercode>) logged on at 15:24:29.2 


These are some of the initial messages. displayed when the SMCS SIGN ON command is used to start 
up IBASIC. It is not necessary to understand exactly what they mean in order to use IBASIC. 


After these initial messages, a status line is displayed on the bottom line of the terminal and a number 
sign (#) is displayed in the upper left-hand corner of the terminal. The status line tells the user what 
the IBASIC system is doing. The number sign signifies that the system has finished a previous instruc- 
tion and is waiting to receive input. 


NOTE 
If the status line is not displayed on the bottom line of the terminal, or if 
the number sign is not in the upper left-hand corner, the status line option 
must be switched off. Refer to STATUSLINE in Section 12. 


Making a File 
To begin writing a BASIC program, enter the following: 
MAKE PROGRAMI 


This command creates a workfile named PROGRAMI into which user-entered program statements are 
stored. After the number sign (#) is displayed again, the system is ready for entry of BASIC language 
statements. 


Enter the following statements one line at a time, pressing the transmit key (XMT) after typing each 
line. Be sure to include the line numbers (10, 20, 30, 40) as they appear below. 


10 PRINT "PROGRAMI ADDS TWO NUMBERS AND PRINTS THE RESULT.” 
20 LET A = 9+ 4 

30 PRINT "9 + 4 =";A 

40 END 


Each of these statements is entered into the workfile PROGRAMI after transmission. They are stored 
there until the user explicitly removes one or more of the statements or until the workfile is removed. 
These statements comprise a BASIC program. When the program is run, the first PRINT statement 
causes display of the string of characters that appears between the quotation marks. The LET statement 
adds 9 and 4 and assigns the sum to variable A. The second PRINT statement causes display of the 
string between quotation marks and the value assigned to variable A. The END statement signifies the 
end of the program. 
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Before instructing the computer to execute PROGRAMI, the user should consider what happens in 
the case of an accidentally misspelled BASIC keyword, one of the predefined words which make up 
the BASIC language. Assume that the keyword PRINT was accidentally entered as PINT on line 30. 
To see the effects, enter the following: 


30 PINT "9 + 4 ="3A 
The user statement and the output will look like the following: 


#30 PINT "9 + 4 ="3A 
—--~-> 
error 20 — incomprehensible statement 


The arrow points to the beginning of the portion of the statement that contains the error. The error 
message will help the user to determine exactly what is wrong with the statement. In this case IBASIC 
could not understand what statement was entered since PINT is not a BASIC keyword. This new state- 
ment 30 replaced the old statement 30, even though the new statement was in error. Enter the following 
to list PROGRAMI and see the erroneous statement in relation to the correct statements: 


LIST 


The LIST command lists the program statements. The statement in error is highlighted. In order to 
correct the error, re-enter the line as follows. 


30 PRINT "9 + 4 ="3A 
The program is now the same as it was originally. 


There are many errors that can be detected upon transmission of a line. Each of them is accompanied 
by a descriptive message to help the user determine the cause. 


Executing a BASIC Program 
In order to instruct the computer to execute the program just written, enter the following: 
RUN 


The RUN command initiates execution of the program. In PROGRAMI, the first statement executed 
is the PRINT statement on line 10. Line 20 is executed next, then line 30, and line 40 last. The flow 
of execution continues in this manner unless the programmer specifies that it be changed. Statements 
that change the flow are described in detail in Section 7. One of these statements, the GOTO statement, 
is briefly mentioned in this section. 


The output from the RUN command previously entered is similar to the following: 
running "PROGRAMI” from line 10 at 11:06:46.4 
PROGRAMI ADDS TWO NUMBERS AND PRINTS THE RESULT. 


9+ 4 = 13 
end run of "PROGRAMI” at line 40 
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Editing a Program 


It is obvious that PROGRAMI1 executes correctly, since there were no errors and the output was what 
was expected, but one hardly needs a computer to find the sum of 9 and 4. The program can easily: 
be changed to handle more significant problems by the addition and deletion of a few statements. The 
following paragraphs direct the user to change or edit this program in such a way that it will compute 
and display the sum of almost any two numbers. The numbers it will not be able to compute are those 
that are too large for the computer to store. 


First, do a LIST command to see exactly what the program looks like. 


Line 20 is not needed because it only works with the integers 9 and 4. So, delete it by entering the 
following: 


DELETE 20 


This command deletes line 20 from the file currently being written. Now replace the deleted statement 
with the following: 


20 INPUT A 


This statement allows the user to enter a numeric value into variable A from a terminal. The DELETE 
command was not really necessary since re-entering a new line 20 would have written over the old line 
20. The DELETE command is included here so that the user would become familiar with it. To allow 
a second input value, enter the following statement: 


25 INPUT B 


This statement performs the same operation as line 20, except that the input value is assigned to 
variable B. Enter another LIST command to see what has been done. 


Notice that the IBASIC system automatically put the two lines into their proper numerical order. Now, 
re-enter the PRINT statement on line 30 in the following way: 


30 PRINT A; 7+"; B; "="; A + B 


When run, this PRINT statement causes display of the value stored in variable A, a plus sign (+), 
the value stored in variable B, an equal sign (=), and the value A + B. Now add the following state- 
ment so that the addition can be done repeatedly: 


35 GOTO 20 
Now execute the program again by entering the RUN command. 


A question mark (?) is displayed in the upper left-hand corner of the terminal. This is a prompt, issued 
as a result of the appearance of the INPUT statement. A prompt tells the user to enter the required 
data. In this case, the data is a number. Enter a number. Enter a second number when the next prompt 
is displayed. The program displays the sum. Enter several pairs of numbers to make sure that the pro- 
gram works correctly. ; 


Stopping Execution of a Program 


This program would go on forever, if allowed, but the user probably has better things to do. To stop 
the program, depress the SPCFY key on the keyboard of a TD series terminal. For other types of 
terminals, refer to the Pseudo BREAK Feature subsection in Section 11. 
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IBASIC responds with a message similar to the following: 


>>> BREAK received — INPUT terminated at line 20 
A More Complex Example 


Remove PROGRAM I and make a new file with a name of your choice by entering the following two 
instructions. 


SCRATCH 
MAKE <file-name> 


<file-name> must be created by the user. For example, the first or last name of the user will probably 
be valid. The maximum length allowed is ten characters. 


The following sample program calculates the greatest common divisor (GCD) of two integers. Enter 
the following statements. As before, transmit after each statement is entered. If a line of input is too 
long for one line on the terminal, continue typing onto the next terminal line — IBASIC allows up 
to 256 characters to be entered per line. 


10 PRINT "THIS PROGRAM CALCULATES THE GREATEST COMMON DIVISOR OF TWO 
INTEGERS. IT IS ONLY ACCURATE UP TO 16,777,215.” 
20 PRINT 

30 PRINT "ENTER THE FIRST INTEGER.” 

40 INPUT A 

50 LETC =A 

60 PRINT "ENTER THE SECOND INTEGER.” 

70 INPUT B 

80 LET D = B 

90 IF A = B THEN 150 

100 IF A < B THEN 130 

110 LET A = A — B 


120 GOTO 90 

130 LET B= B-A 

140 GOTO 90 

150 PRINT "THE GREATEST COMMON DIVISOR OF”; C; "AND’; D; “IS”; A 
160 PRINT | 


170 PRINT "DO YOU WANT TO CONTINUE? Y OR N’” 

180 INPUT E$ 

190 IF E$ = "Y” THEN 30 

200 IF E$ = "N” THEN 230 

210 PRINT “COME ON, Y OR N CANNOT BE THAT HARD...TRY AGAIN.” 
220 GOTO 180 

230 END 


Before proceeding to an explanation of the new statements used in this program, enter the RUN com- 
mand to see how it works. 


Instructions for the program are displayed by the program on the user's terminal. Follow these instruc- 


tions and enter several pairs of integers to validate the correctness of the program and to become famil- 
iar with it. 
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Unlike the previous example in which outside intervention (BREAK) was necessary to stop execution, 
the GCD program can be stopped programmatically. In other words, the user can instruct the program 
to stop itself without any outside intervention. Stop the program by following the instructions displayed 
by the program. 


Each of the statements in the current program — program that is currently loaded into the BASIC 
environment — is now briefly described. In order to see each statement as it is described, do a LIST 
in the following manner: 


LIST 10 TO 200 


The PRINT statement on line 10 causes display of the string between the quotation marks. This string 
contains instructions for the operator of the program. Notice that the string of characters in the sample 
program is too long to fit on one terminal line so it has been continued on the next terminal line. 


The PRINT statement on line 20 causes display of a blank line to improve readability of the program 
as it is executed. 


The PRINT statement on line 30 causes display of the string between the quotation marks. This quoted 
string (string within quotation marks) instructs the user to enter an integer value. 


Line 40 contains the INPUT statement that allows input to the program. It also causes the prompt 
character (?) to be displayed on the terminal. 


Line 50 causes the contents of variable A to be assigned to variable C. 


The PRINT statement on line 60 causes display of the string within the quotation marks. The string 
contains additional instructions. 


Line 70 accomplishes the same task that line 40 did, except that variable B is used. 
Line 80 causes the contents of variable B to be assigned to variable D. 


Line 90 contains a statement that has not yet been described, the IF statement. The IF statement tests 
a condition to see whether it is true or false. In this case, the condition is “Is A equal to B?” If the 
condition is true, the statement following the word THEN is executed. When this statement is a line 
number, the next statement executed is the statement whose line number appears after the word THEN. 
Line 90 is read in the following way: If the contents of variable A are equal to the contents of variable 
B, then go to line number 150. If A is not equal to B, the statement following the IF statement is 
executed. 


Line 100 contains another IF statement. This statement is read as follows: If the contents of variable 
A are less than the contents of variable B, then go to line number 130. If A is not less than B, the 
statement on line 110 is executed. 


On line 110, the contents of B are subtracted from the contents of A and the difference is stored in 
variable A. 


Line 120 jumps execution back to line 90. 


On line 130, the contents of A are subtracted from the contents of B and the difference is stored in 
variable B. 


Line 140 is a duplicate of line 120. 
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The PRINT statement on line 150 causes the answer to be displayed. 
The PRINT statement on line 160, like line 20, is for readability. 
Line 170 asks if the program is to be continued. 


Line 180 contains another INPUT statement. This time, though, a dollar sign ($) comes after the 
variable. The variables that have been used up to now (A, B, C, D) only allow the use of numbers 
with them. A variable with a dollar sign following it allows the use of alphabetic characters. Variable 
E$ receives the N or Y that the user enters. 


Line 190 tests the contents of variable E$. If E$ contains a Y, then the program continues at line 30. 
Line 200 also tests the contents of variable E$. If E$ contains an N, then line 230 is executed next. 
Do another LIST: 

LIST 210 TO 230 
Now the remainder of the statements can be seen. 


Line 210 displays an instructive message to the user. This line is executed only if E$ does not contain 
an N or a Y. 


Line 220 causes execution to continue with line 180. 
Line 230 ends the program. 


Even though all the statements have been discussed separately, the user may still not understand how 
the program actually calculates the GCD of two integers. In order to understand this, each statement 
must be understood in relation to the other statements in the program. This exercise, left to the user, 
entails simulating the computer; that is, thinking through what the computer would do with each state- 
ment of the program. 


Program Debugging Commands 


There are two additional types of commands described in this section. The first type, IBASIC debug- 
ging commands, involves several more IBASIC commands. The second, command mode, involves using 
the BASIC language statements in a different manner than they have been used up to this point in 
the manual. The GCD program is used to explain these features. 


Some IBASIC Commands for Debugging 


Enter the RUN command again. Now enter the integers 16777215 and 16777214. The user will certainly 
tire of waiting for this answer, but the delay will give us time to examine the two types of commands 
mentioned. Begin by depressing the SPCFY key as in the previous example. The use of the SPCFY 
key in this manner is known as a BREAK. The user will now be guided in the use of several commands 
useful in examining the execution of a program. 


First, find out where execution was terminated by entering the following IBASIC command: 
WHERE 
IBASIC responds with a message similar to the following: 


you are stopped — ready to continue at line 130 
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After a program is stopped, it may be executed one statement at a time with the STEP command. 
The STEP command may be entered in two ways: (1) by explicitly entering the word STEP, or (2) 
by pressing the SPCFY key. Enter the STEP command if it has not been entered already. 


IBASIC executes the next statement, displays it, and stops before the execution of the subsequent state- 
ment. An entire program may be executed in this manner, if desired. STEP is useful when the execu- 
tion of sections of code need to be closely observed. To resume normal execution, use the CONTINUE 
command. 


CONTINUE 


Before this program terminates, stop execution again by using the BREAK feature (SPCFY key). 


Command Mode 


As mentioned in the first part of this section, BASIC language statements may be entered in two ways: 
Command mode and Entry mode. All of the BASIC statements entered up to this point in the manual 
have been in the Entry mode. Entry mode statements are entered into a file and stored for subsequent 
use and are characterized by a line number at the beginning of the line. 


In Command mode, the line number is omitted. This omission tells IBASIC that the statement is to 
be executed immediately. Many of the BASIC statements may be used in Command mode. A list of 
the statements that cannot be used in Command mode appears in BASIC Commands in Section 11. 
To understand how Command mode can help in analyzing a program, enter the following: 


PRINT A; B 


The values displayed are the current values of the variables A and B from the GCD program. They 
are only of value to those users who understand how the program calculates the greatest common divi- 
sor. These users know that A is continually subtracted from B, or vice versa, until the two variables 
are equal. As one can see from the output of the PRINT statement previously entered in command 
mode, one of the variables has the value 1 and the other contains a very large number. Obviously, 
the program takes quite a while to run to termination. The time necessary for this program to finish 
can be reduced if the larger of the two variables is made smaller. So, using another BASIC statement 
in Command mode, change the value of the larger variable. You can determine which of the two 
variables is the larger by using the PRINT command (Command mode). 


Change the value of the larger variable to 1000 by entering the following statement: 
LET <larger variable> = 1000 
Resume execution by entering the CONTINUE command. The program will terminate quite rapidly. 


SAVE, SCRATCH, and BYE Commands 


The last three commands that the user will want to learn about before leaving the terminal are the 
SAVE, SCRATCH, and BYE commands. 


If you want to save the program for later use, enter the following: 


SAVE 
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The SAVE command creates a copy of the current workfile and stores it on disk. If you do not want 
to SAVE the program, enter the following: 


SCRATCH 
The SCRATCH command, as previously shown, removes the current program. 
In order to terminate the IBASIC system, enter the following command: 
BYE 
The BYE command causes termination of the IBASIC system. The output is similar to the following: 
connect time = 00:05:36.0, cpu time = 2 units 
(<usercode>) logged off at 15:27:29.6 
goodbye 
REMOTE FILE CLOSED BY "IBASIC’. 


In order to sign off SMCS, enter BYE again. 
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SECTION 3 
PROGRAM COMPOSITION 


A BASIC program is made up of a number of lines. Each line consists of characters from the character 
set for BASIC. The concepts of lines, characters, and the fundamental rules for combining these 
elements in order to write BASIC programs are described in this section. 


STATEMENT LINES 


A statement line consists of a line number followed by a BASIC language statement. The maximum 
length allowed for a statement line is 256 characters. There may be a maximum of 1979 statement lines 
in a program. 


Unless otherwise specified, the term “line” in this manual is not synonymous with the same term as 
used in relation to a terminal or a printer. For example, one statement line may occupy three “lines” 
on a terminal. 


Syntax: 


Sara a 
< digit > < BASIC-language-statement > —_. 


G18000 


<digit> is any decimal digit. At least one <digit> must be nonzero. Leading zeros have no effect, 
other than counting as a digit in the line number. <BASIC-language-statement >s are described in Sec- 
tions 4 through 10. 


Examples of statement lines: 


99999 PRINT A 
1 REM THIS IS THE START OF THE PROGRAM. 
0001 PRINT “ENTER YOUR NAME.” 
02340 LET AS(X*Y) = "25" & Al$ 
100 BREAK 


CHARACTER SET 


A BASIC statement line consists of characters from the character set for BASIC. The standard charac- 
ter set for BASIC is contained in the International Reference Version of ISO Standard 646, 7-Bit In- 
put/Output Coded Character Set, 4th Edition. Table E-1 in Appendix E contains this character set. 
BASIC can also use the EBCDIC character set if the user desires (refer to the OPTION statement in 
Section 5). Table E-2 in Appendix E contains this character set. All lower-case characters are translated 
directly to their upper-case equivalent everywhere within the IBASIC system except for strings enclosed 
within quotation marks (for example, print a,b is equivalent to PRINT A,B). 


PROGRAM DOCUMENTATION 


BASIC programs may be documented with tail comments at the end of statement lines or with a 
separate statement called a REM statement. 
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Tail Comments 


A tail comment can be entered at the end of a line in order to provide a clear description of what 
a BASIC statement or a group of BASIC statements does. Tail comments have no effect on the execu- 
tion of a program. 


Syntax: 
ee > ~~ < exclamation-mark > < remark-string > | 
G18001 


<statement-line> is described under Statement Lines in this section. <exclamation-mark > indicates 
the beginning of the tail comment. <remark-string> is any string of characters that the programmer 
chooses in order to explain the statements of the program. 


Examples of tail comments: 


PRINT A, B, C PRINT THE ANSWERS 
LET T = T2 —- Tl SUB INITIAL TIME FROM TERMINAL TIME 


REM Statement 


The REM statement must occur on a line by itself. It serves to document a program and has no effect 
on the execution of the program. 


Syntax: 


REM < remark-string > SO —_ 


G18002 
<remark-string > is any string of characters that the programmer chooses in order to explain the state- 
ments of the program. 

Examples of REM statements: 


REM THIS PROGRAM CALCULATES THE GREATEST COMMON DIVISOR 
REM OF TWO INTEGERS. 


STOP Statement 
The STOP statement causes termination of the program. 


Syntax: 


STOP i _ 


The STOP statement may occur anywhere within a program. 


G18003 
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END Statement 


The END statement marks the physical end of the program and causes termination of execution of 
the program when encountered. 


Syntax: 


END a 


G18004 


The END statement may occur only at the physical end of the main program. 


GENERAL SYNTAX RULES 


The following rules must be observed in writing a BASIC program. 


1. Each statement of a program must begin with a unique, positive, nonzero line number and must 
contain one BASIC statement. 

2. Spaces must not occur within keywords, within the word TAB in a tab call, within numeric 
constants, within line numbers, within variable names, or within multicharacter relation symbols 
(>=, =<). Spaces can occur anywhere else within a program to enhance readability. 

3. Spaces must occur around keywords. A keyword is a character string that provides a distinctive 
identification of a statement or a component of a statement. Examples of keywords include 
ELSE, GOTO, MAT, PRINT, READ, THEN, USING and WRITE. 

4. Each program must terminate with an END statement. 

5. Lines are executed in sequential order, starting with the first line in the program, and 
continuing until some other action is dictated by execution of a control statement, until a STOP 
or END statement is executed, or until the occurrence of a fatal error (an error which stops 
the execution of a program). 

6. Upper-case and lower-case characters are interchangeable. Lower-case characters are translated 
to their upper-case equivalents everywhere within the IBASIC system except in strings within 
quotation marks. 
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SECTION 4 
NUMERIC DATA CONSTRUCTS 


There are two data types in BASIC: numeric and string. Associated with each of these data types are 
constants, variables, and intrinsic functions from which expressions can be formed. This section deals 
with data type numeric and the expressions that can be formed from the fundamental numeric con- 
structs. Strings are explained in Section 5. 


NUMERIC CONSTANTS 


Numeric constants are used to denote numeric values. Unlike some programming languages, BASIC 
does not distinguish between numbers containing a decimal point (real numbers) and those written with- 
out a decimal point (integers): all numeric values in IBASIC are stored internally in floating-point 
form, that is, as a sign, exponent, and fraction, and are handled as real numbers. 


Syntax: 


< sign > < integer > 


< integer > 


i eas aa 


G18005 - <integer > 


<sign> is a plus sign (+) or a minus sign (-). <integer> is a series of decimal digits. 
Semantics: 


Numeric values are maintained with a precision of at least six decimal digits (21 to 24 binary digits 
depending on the value). They may range from approximately 5.39761E-79 to 7.23701E+75. 


E signifies "times ten to the power.” For example, 2.145E-4 is read as 2.145 times ten to the power 
—4 and represents the value .0002145. If the <sign> is omitted, plus (+) is assumed. 


Examples of numeric constants: 


—21. 
1E10 
5E-2 

.4E + 1 
500 

1 

.255 
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NUMERIC VARIABLES 


A numeric variable is a symbolic name used to represent a numeric value which may be changed during 
program execution by a numeric assignment statement. (Refer to Numeric Assignment Statement in this 
section.) Numeric variables may either be simple or subscripted. All numeric variables, whether simple 
or subscripted, are of type real, A subscripted variable is one element of an array. Arrays are described 
in Section 6. 


Syntax: 


< letter > ( < subscript > ap ee ) 


G18006 


<letter> is any English alphabet character (A through Z). <digit> is any decimal digit (0 through 
9). The same <letter> or <letter> <digit> combination cannot be used as the name of both a sim- 
ple numeric variable and a numeric array, nor the name of both a 1-dimensional (one <subscript >) 
and a 2-dimensional (two <subscript>s) numeric array. <subscript> is any numeric expression. It 
is an index into the array. <subscript> is always rounded to the nearest integer. The rounded value 
is defined as INT(<subscript> +.5), where INT signifies “the largest integer not greater than.” A 
<subscript > must be in the allowable range of subscripts for the array being referenced. 


Semantics: 


Explicit declarations of numeric variables in BASIC are not necessary except in the case of certain sub- 
scripted numeric variables. These declarations are described in Section 6. Numeric variables with no 
explicit declaration are implicitly declared through their appearance in a program unit. Of these impli- 
citly declared numeric variables, those followed by one or two subscripts are numeric arrays whose sub- 
scripts can range in value from zero, or one, to ten. A subscripted numeric variable refers to the 
element in the 1-or 2-dimensional array selected by the value(s) of the subscript(s). A numeric 
variable that has no subscripts and does not occur in a MAT statement (refer to Section 6) is a simple 
variable. 


The initial value of each numeric variable at execution time is zero. 
Examples of numeric variables: 

x 

AS 


V(4) 
W(X,X + Y/2) 
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NUMERIC ASSIGNMENT STATEMENT 


The numeric assignment statement is used to assign a computed value to a list of simple or subscripted 
variables. 


Syntax: 


LET < rae papee teal = = <numeric-expression > J 


G18007 


<numeric-variable> is described under Numeric Variables in this section. Simple and subscripted 
variables may appear in the same list of <numeric-variable>s. <numeric-expression> is any numeric 
expression valid in BASIC. 


Semantics: 

A numeric assignment statement is evaluated in the following manner: The subscripts, if any, of 
variables in the <numeric-variable> list are evaluated in sequence from left to right. Next, the expres- 
sion on the right of the equal sign (=) is evaluated. Finally, the value of that expression is assigned 
to each variable in the <numeric-variable> list. 


Examples of numeric assignment statements: 


LET P = 3.14159 ! P gets an approximation of PI. 


LET A(X,3) = SIN(X)*Y+ 1 ! Array element A(X,3) is 
! assigned the expression value. 


LET A, Yd), Z = I + 1 ! A, Y(I), and Z are assigned 
YI 4+ 61. 

A = B ! A is assigned the value of B. 

LET Td,J), I, J = I+ J ! The listed variables are 


! assigned the sum of I and J. 


In the last example, understanding the order of evaluation of a numeric assignment statement is neces- 
sary in order to fully understand the statement. Assume that variables I and J have the values 
1 and 2 respectively. The subscripts, I and J, in the reference to array T are evaluated first. Thus, 
the array element being referenced is T(1,2). The numeric expression, I + J, is then evaluated. Its value 
is 3. Thus, the assignment statement results in the assignment of 3 to variables T(1,2), I, and J. In 
contrast, if subscripts in the <numeric-variable> list were evaluated after the <numeric expression > 
had been assigned to I and J, the array element referenced would have been T(3,3). 
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NUMERIC EXPRESSIONS 


A numeric expression is any numeric constant, numeric variable, numeric function reference, or a com- 
bination of these separated by the operators representing addition, subtraction, multiplication, division 
and exponentiation. 


Syntax: 


< operator > 


< numeric-constant > 
< numeric-variable > 
- < numeric-function-ref > 


( < numeric-expression > ) 


G18008 


<operator> is one of the following: 


Operator and Name Meaning 

“  Circumflex accent Exponentiation 
** Double asterisk Exponentiation 
+  Unary plus No action 
— Unary minus Negation 
* Asterisk Multiplication 
/ Solidus Division 

, + Plus sign Addition 

. — Minus sign Subtraction 


<numeric-constant > is defined under Numeric Constants in this section. <numeric-variable> is de- 
fined under Numeric Variables in this section. <numeric-function-ref> includes the intrinsic numeric 
functions as defined under Intrinsic Numeric Functions in this section and the user-defined numeric 
functions as defined under User-Defined Functions in Section 8. User-defined functions must be de- 
fined in the program unit in which they are referenced. The appearance of a <numeric-expression > 
between parentheses signifies that a numeric expression may be used as an operand in a larger numeric 
expression which encompasses the numeric expression in parentheses. 


Semantics: 


The rules for formation and evaluation of numeric expressions follow normal algebraic rules. There 
are four levels of precedence. These levels, listed in order from highest precedence to lowest, follow. 


. Exponentiation 

. Unary plus and minus 

. Multiplication and division 
. Addition and subtraction 


WN = 


The order of evaluation can be changed by the use of parentheses. Operations within parentheses are 
performed first. Operations on the same precedence level are performed left to right unless parentheses 
dictate otherwise. Refer to the examples that follow in this subsection for detailed explanations of spe- 
cific cases. 
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When numeric overflow or underflow occurs, that is, when a numeric value either exceeds or is less 
than the allowable limits for numeric values, the condition is reported and execution continues. The 
resultant value when overflow occurs is the largest representable value, 7.237E+75. The resultant value 
when underflow occurs is zero. Division by zero, and zero raised to a negative power are treated as 
overflows. 0**0 is defined as 1. When a negative number is raised to a nonintegral power a fatal error 
occurs. 


Examples of numeric expressions: 


3*X — Y**2 !Y squared is subtracted from the 
! product of 3 and X. 


A(i) + A(2) + A(3) ! The array elements listed are 


! added. 

—X/Y ! Negative X divided by Y. 

2 =X) !2 raised to the negative Xth 
! power. 

SQR(X**2 + Y**2) ! The square root of the sum of X 
! squared and Y squared. 

A-B-C (A - B)- C 

A**B**C (A ** B) ** C 

A/B/C '(A / B)/C 

~A**B !_ (A ** B) 


INTRINSIC NUMERIC FUNCTIONS 


Predefined functions are supplied as part of the IBASIC system for the evaluation of commonly used 
numeric functions. The general syntax for the intrinsic numeric functions follows. 


Syntax: 
oe assiloneaa oe 
<intrinsic-numeric-function > TT ( < argument > ) 
G18009 


A description of each of the <intrinsic-numeric-function>s with its meaning follows. Zero, one, or 
two <argument>s can be included depending on the function. In all cases, X and Y represent numeric 
expressions and A represents a numeric or string array. 
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ABS(X) 
The absolute value of X. 
Example: 

LET X = 25.5 


PRINT "ABSOLUTE VALUE OF A =";ABS(X) 
PRINT “ABSOLUTE VALUE OF — 123.45 =";ABS(— 123.45) 


When the statements in this example are run, the following output is produced. 


ABSOLUTE VALUE OF A = 25.5 
ABSOLUTE VALUE OF — 123.45 = 123.45 


ACOS(X) 


The arccosine of X in radians, where 0 <= ACOS(X) <= PI; X must be in the range -—1 <= 
X <= 1, PI = 3.14159. 


ANGLE(X,Y) 


The angle in radians between the positive x-axis and the vector joining the origin to the point with 
coordinates (X,Y), where —PI < ANGLE(X,Y) <= PI. The values of X and Y cannot both be zero. 


Example: 
PRINT "ANGLE BETWEEN (1,0) AND (1,1) IS’; ANGLE(,1) 
Execution of this example causes the following to be displayed. 
ANGLE BETWEEN (1.0) AND (1,1) IS .785398 
ASIN(X) 


The arcsine of X in radians, where ~- PI/2 < = ASIN(X) < = PI/2; X must be in the range —-1 <= 
), ae ee oa 


ATN(X) 


The arctangent of X in radians; that is, the angle whose tangent is X, where —(PI/2) < ATN(X) < 
(PI/2). 


CEIL(X) 
The smallest integer not less than X. 
Examples: 


PRINT "CEIL OF 1.5 IS”;CEIL(1.5) 
PRINT "CEIL OF —1.5 IS ";CEIL(— 1.5) 


Execution of these statements gives the following output: 


CEIL OF 1.5 IS 2 
CEIL OF —1.5 IS —1 
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COS(X) 

The cosine of X, where X is in radians. 
COSH(X) 

The hyperbolic cosine of X, where X is in radians. 
COT(X) 

The cotangent of X, where X is in radians. 
CSC(X) 

The cosecant of X, where X is in radians. 

DATE 


The current date in decimal form YYDDD, where YY is the last two digits of the year and DDD is 
the number of days elapsed in the year. 


Example: 
PRINT DATE 

If the date was May 17, 1980, this example would give the following output: 
80138 

DEG(X) 

The number of degrees in X radians. 

Examples: 


PRINT “DEG OF PI IS";DEG(PI) 
PRINT "DEG OF PI/6 IS";DEG(PI/6) 


Execution of these examples gives the following output: 


DEG OF PI IS 180 
DEG OF PI/6 IS 30 


DET FUNCTION 


The DET function produces the determinant of a 2-dimensional square array. The syntax and semantics 
of the DET function follow. 


Syntax: 


—— DET aie ( —— <array-name> —— ) ae 


<array-name> is a 2-dimensional array that follows the formation rules of a simple numeric variable. 
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Semantics: 

The DET function returns the value of the determinant of its argument. If there is no argument explic- 
itly named, the DET function returns the value of the determinant of the array most recently used 
as an argument of a MAT INV function. 


If the DET function is used without an argument before the MAT INV function is invoked, a fatal 
error Occurs. 


A fatal error also occurs if the array referred to in the DET function is not a 2-dimensional square 
array. 


Examples of the DET function: 


DET 
DET(B) 


In the first example, no argument is explicitly named. In this case, the DET function returns the value 
of the determinant of the array most recently used as an argument of a MAT INV function. In the 
second example, the DET function returns the value of the determinant of array B. 


In using the second example, assume that array B is a 2-by-2 array and contains the following values: 


Z 5 
4 8 


In this case, DET(B) returns the value —4. 

EPS 

The smallest positive nonzero number that can be represented by the machine: 5.39761E-79 
EXP(X) 


The exponential of X; that is, the value of the base of natural logarithms (2.71828) raised to the power 
X. 


FP(X) 
The fractional part of X, FP(X), is equivalent to X — IP(X), where IP signifies "integer part of.” 
Example: 
PRINT "FP OF 17.358795 IS”;FP(17.358795) 
Execution of this example produces the following output: 
FP OF 17.358795 IS .358795 
INF 
The largest positive number that can be represented by the machine: 7.237E+75 
INT(X) 


The largest integer not greater than X. 
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Example: 
A = 69 
B= 6 
C = -6.14 


PRINT "LARGEST INTEGER NOT GREATER THAN’; A;” IS”; INT(A) 
PRINT "LARGEST INTEGER NOT GREATER THAN’; B;” IS”; INT(B) 
PRINT "LARGEST INTEGER NOT GREATER THAN "3C;”" IS "; INT(C) 
PRINT "LARGEST INTEGER NOT GREATER THAN —2 IS "; INT(—2) 


Execution of the above example causes the following to be displayed. 
LARGEST INTEGER NOT GREATER THAN 6.9 IS 6 
LARGEST INTEGER NOT GREATER THAN 6 IS 6 
LARGEST INTEGER NOT GREATER THAN —6.14 IS —7 
LARGEST INTEGER NOT GREATER THAN —2 IS —2 

IP(X) 

The integer part of X. IP(X) is equivalent to SGN(X)*INT(ABS(X)). 


Examples: 


PRINT “IP OF —6.14 IS”;IP(— 6.14) 
PRINT “IP OF 6.9 IS”’;IP(6.9) 


Execution of these examples causes the following to be displayed. 


IP OF —6.14 IS —6 
IP OF 6.9 IS 6 


LDIM(A,X) 
The lower bound for the Xth subscript of array A. 
Example: 


DIM A(10,10) 
PRINT “LDIM OF THE 2ND SUBSCRIPT OF ARRAY A IS”;LDIM(A,2) 


Execution of this example gives the following output: 

LDIM OF THE 2ND SUBSCRIPT OF ARRAY A JS 0. 
LOG(X) 
The natural logarithm of X. X must be greater than zero. 
LOG 10(X) 
The common logarithm of X. X must be greater than zero. 
LOG2(X) 


The base 2 logarithm of X. X must be greater than zero. 
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MAX(X, Y) 
The larger of X and Y. - 
MIN(X,Y) 
The smaller of X and Y. 
MOD(X,Y) 


The modulo function, MOD(X,Y), is equivalent to X— Y*INT(X/Y) if Y is nonzero, and is equivalent 
to 0 if Y is zero. 


Example: 


PRINT "MOD OF 100 AND 90 IS”;MOD(100,90) 
PRINT "MOD OF 10 AND —4 IS ";MOD(10, — 4) 


Execution of this example causes the following to be displayed. 


MOD OF 100 AND 90 IS 10 
MOD OF 10 AND -4 IS —2 


Pl 
The constant 3.14159, which is the ratio of the circumference of a circle to its diameter. 
RAD(X) 
The number of radians in X degrees. 
Example: 
PRINT “RAD OF 30 DEGREES IS”;RAD(30) 
Execution of this example gives the following output: 
RAD OF 30 DEGREES IS .523599 
REM(X,Y) 


The remainder function. REM(X,Y) is equivalent to X— Y*IP(X/Y) if Y is nonzero, and is equivalent 
to 0 if Y = 0. 


Examples: 


PRINT "REM OF 100 AND 90 IS”;REM(100,90) 
PRINT “REM OF 10 AND —4 IS";REM(10, — 4) 


Execution of these examples causes the following to be displayed. 


REM OF 100 AND 90 IS 10 
REM OF 10 AND —4 IS 2 
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RND 


The next pseudo-random number in the sequence of pseudo-random numbers uniformly distributed in 
the range O <= RND < 1. The RANDOMIZE statement can be used in conjunction with the RND 
function to initiate a different and unpredictable sequence of pseudo-random numbers. Refer to the 
subsection entitled RANDOMIZE statement in this section. 


SEC(X) 

The secant of X, where X is in radians. 

SGN(X) 

The sign of X, SGN(X), is —1 if X < 0, is O if X = 0, and is +1 if X > O. 
SIN(X) 

The sine of X, where X is in radians. 

SINH(X) 

The hyperbolic sine of X, where X is in radians. 

SQR(X) 

The nonnegative square root of X. X must be nonnegative. 
TAN(X) 

The tangent of X, where X is in radians. 

TANH(X) 

The hyperbolic tangent of X, where X is in radians. 


TIME 


The time elapsed since the previous midnight, expressed in seconds; for example, the value of TIME 
at 11:15 AM is 40500. 


Example: 
T = TIME 
FOR X = 1 TO SE5 
LET Av] xX 
NEXT X 


PRINT “ELAPSED TIME IS’;TIME — T;”"SECONDS.” 
Execution of this program segment causes the following to be displayed. 


ELAPSED TIME IS 123 SECONDS. 
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UDIM(A, X) 
The upper bound for the Xth subscript of array A. 
Example: 


DIM B(100,10) 
PRINT "UDIM OF THE 1ST SUBSCRIPT OF B IS’;UDIM(B,1) 


Execution of this partial program causes the following to be displayed. 

UDIM OF THE 1ST SUBSCRIPT OF B IS 100 
As with numeric expressions, in case of an overflow or underflow in a numeric function, the condition 
is reported, the appropriate value (the largest machine value for overflow and zero for underflow), is 


substituted and execution continues. 


The result of evaluating a numeric function is a scalar numeric value (quantity characterized by a single 
value) which replaces the <numeric-function-ref> in the numeric expression. 


RANDOMIZE STATEMENT 


The RANDOMIZE statement overrides the normal sequence of pseudo-random numbers used as values 
for the RND function, generating a different and unpredictable sequence of pseudo-random numbers 
used subsequently by the RND function. 


Syntax: 


RANDOMIZE SS SSS SSS 


G18010 
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SECTION 5 
STRING DATA CONSTRUCTS 


There are two data types in BASIC: numeric and string. Numeric constructs are described in Section 
4. Strings may contain arbitrary sequences of characters, and their lengths are variable. The constructs 
used with strings are described in detail in this section. 


STRING CONSTANTS 
A string constant is a string of characters enclosed within quotation marks (”). 


Syntax: 


254 


< quoted-string-character > 


G18011 


< quoted-string-character> is any character in Table E-1, Appendix E, except those characters in or- 
dinal positions 0 through 31, 34, 64, 91 through 93, 96, and 123 through 127. A quotation mark, or- 
dinal position 34, may be included in a string constant by representing it by two adjacent quotation 
marks. The length of a string constant is limited to 255 bytes. 


Examples: 


XV Zz" 

"1BE10” 

"He said,””Don't.””” !TIwo adjacent quotation marks, 
! used to represent one quotation 
! mark inside the string. 
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STRING VARIABLES 


A string variable is a symbolic name used to represent a string value. A string variable may be changed 
during program execution by a string assignment statement (refer to String Assignment Statement in 
this section). String variables may either be simple or subscripted. The proper syntax for a string 
variable follows. 


Syntax: 


————- < letter > a < digit > ne $ ( < subscript > “a » <subscript > - 7 ) 
CS I 


G18012 


<letter> is any English alphabet character (A through Z). <digit> is any decimal digit (0 through 
9). The same <letter> or <letter> <digit > combination cannot be used as the name of both a sim- 
ple string variable and a string array, nor as the name of both a 1-dimensional and a 2-dimensional 
string array. <subscript> is any numeric expression. <subscript> is always rounded to the nearest 
integer. The rounded value is defined as INT(<subscript > + .5). A <subscript > must be in the allow- 
able range of subscripts for the array being referenced. <index> is an index to a byte of the string 
variable. 


Semantics: 


The length of the character string associated with a string variable can vary during the execution of 
a program from a length of zero characters, signifying the null or empty string, to a maximum length 
of 255 characters, or to the length defined in a string declaration. Refer to String Declarations in this 
section for further information on length specification of a string variable. 


Explicit declarations of string variables in BASIC are not necessary except when it is desired to set 
a maximum assignable length for the string to a value less than 255. Declarations involving subscripts 
are described in Section 6. The description of the method for declaring a specific length is under String 
Declarations in this section. 


String variables with no explicit declaration are implicitly declared through their appearance in a pro- 
gram. Of these implicitly declared string variables, those followed by one or two subscripts are string 
arrays whose subscripts can range in value from zero or one to ten. A subscripted string variable refers 
to the element in the 1- or 2-dimensional array selected by the value(s) of the subscript(s). A string 
variable with no subscripts is a simple variable. 


The substring qualifier specifies a portion of the value associated with a string variable. <string- 
variable> (<m>:<n>) specifies that portion of the value associated with <string-variable> from 
its <m>th to its <n>th characters, inclusive. Characters in a string are numbered from the left start- 
ing with one. No errors can occur with substring qualifiers; if either <m> or <n> is not in the 
range from 1 to LEN(<string-variable>), then <m> is MAX(<m>,1) and <n> is MIN(<n>,L- 
EN(<string-variable>)). If <m> < <n>, even after this adjustment, then <string-variable> 
(<m>:<n>) is the null string. For example, if A$="’1234’, then A$(1:1)="1", A$ (1:3) ="123’, 
A$(0:3) = 7123”, A$(2:5)= "234", and A§$(3:2) = A$(5:7)="". 
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The initial value of each string variable at execution time is the null string (’”). 


Examples of string variables: 


K$ 
R2$(15:20) 
A$(4) 
B1$d,J) 


STRING ASSIGNMENT STATEMENT 


The string assignment statement is used to assign a string value to a list of simple or subscripted 
variables. 


Syntax: 


LET < eee ite = < string-expression > a 


G18013 


<string-variable> is described under String Variables in this section. Simple and subscripted variables 
may appear in the same list of <string-variable>s. <string-expression> is any valid string expression 
in BASIC. 


Semantics: 


A string assignment statement is evaluated in the following manner: The subscripts, if any, of variables 
in the <string-variable> list are evaluated in sequence from left to right. Next, the expression on the 
right of the equal sign (=) is evaluated. Finally, the value of that expression is assigned to each 
variable in the <string-variable> list. 


The length of a string variable can change as a result of an assignment to a string variable having 
a substring qualifier. For example, if A$ = "BASIC”, assigning "KETBALL” to A$(4:5) results in 
"BASKETBALL", and subsequently assigning “FOO” to A$(1:5) results in “FOOTBALL”. 


If the assignment of a string to a string variable causes an overflow of that variable, which means 
that more characters have been assigned to the variable than are allowed, an error message is displayed 
and program execution terminates. 


Examples of string assignment statements: 


LET A$ = “ABC" ! String constant ABC is assigned to A$. 
C$) = B$ ! Ith element of array C$ gets contents of B$. 
AS,B$ = "NEGATIVE’& “DISCRIMINANT” ' A$ and B$ get the value of the string 

' expression. 
D$(2,3)(1:6) = “CHANGE” ! Bytes 1 through 6 of element (2,3) of array 


! D$ get the value of the string expression. 
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STRING EXPRESSIONS 


A string expression is any string constant, string variable, string function reference, or concatenation 
of these. 


Syntax: 


& 


< string-constant > 
< string-variable > 


< string-function-ref > 


G18014 


<string-constant> and <string-variable> are defined in this section under String Constants and 
String Variables, respectively. <string-function-ref> includes the intrinsic string functions as defined 
under Intrinsic String Functions in this section, and the user-defined string functions defined in Section 
8 under User-Defined Functions. The ampersand character (&) signifies concatenation. 

Semantics: 

Concatenation is the joining of the end of one string to the beginning of another. 


If the result of a string operation is longer than 255 characters, a fatal error occurs. 


Examples of string expressions: 


"SOONER OR" 'String constants are string expressions. 


X$(1,3) !String variables are string expressions. 
A$ & BS ! Following text gives explanation. 
BS & A$ ! Following text gives explanation. 


A2$ & BS & "223" !Concatenation of two string variables 
! with a string constant. 


The third example, A$ & B$, shows the use of the concatenate operator (&). Assume that A$ contains 
the constant "COME ” and that B$ contains the constant "IN”. A$ & B$ gives "COME IN”. 


For the fourth example, B$ & A$, assume that A$ and B$ contain the same values as before. BS & 
A$ gives “INCOME ”. 
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Example: 
A$ = "FIRST ---” 
B$ = “SECOND ---” 
C$ = A$ & BS & “THIRD” 
PRINT C$ 


Execution of this example gives the following output: 


FIRST ---SECOND ---THIRD 


INTRINSIC STRING AND STRING-RELATED FUNCTIONS 


Predefined functions are supplied as part of the IBASIC system for the evaluation of commonly used 
string-valued functions and numeric-valued functions whose arguments (parameters passed to a func- 
tion) are strings. The general syntax for the intrinsic string functions follows. 


faeces a 
< intrinsic-string-function > ( < argument > ) 


Syntax: 


G18015 


The number of <argument>s depends on the function. 
Semantics: 


A description of each of the <intrinsic-string-function>s follows. In each of the descriptions, M repre- 
sents an index, that is, the rounded integer value of some numeric expression; X represents a numeric 
expression, and A$ and B$ represent string expressions. 


The result of evaluating a string function is a character string which replaces the <string-function-ref > 
in the string expression. 


CHRS$(M) 


The 1-character string consisting of the character occupying ordinal position M in the collating se- 
quence for the declared character set. (Refer to Tables E-1 and E-2 for the possible collating se- 
quences). M must be greater than zero and less than the number of characters in the declared character 
set. 


Example: 


OPTION COLLATE STANDARD 
PRINT “THE 53RD CHARACTER IS’;CHR§(53) 
PRINT “THE 65TH CHARACTER IS’;CHRS§(65) 


Execution of this partial program causes the following to be displayed. 


THE 53RD CHARACTER IS 5 
THE 65TH CHARACTER IS A. 
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DATES 

The date in the string representation YY/MM/DD. 

Example: 
PRINT DATE$ 

If the date was May 17, 1980, this example would give the following output: 
80/05/17 

LEN(AS) 

The number of characters in the value associated with A$. 


Example: 


READ A$,B$,C$,D$ 
PRINT "A$ = ";A$;” LENGTH OF A$ =";LEN(A$) 


PRINT ’B$ = ”;B$;” LENGTH OF B$ =”";LEN(B$) 

PRINT "C$ = ";C$;” LENGTH OF C$=";LEN(C$) 

PRINT "D$ = ”;D$;” LENGTH OF D$ =";LEN(D$) 

DATA ABC, DEFGH,IJKLMNOPQRST,U V W X Y Z !DATA statement is 
!described in 
'Section 9. 


Execution of the above example causes the following to be displayed. 


A$ = ABC LENGTH OF A$ = 3 

B$ = DEFGH LENGTH OF B§ = 5 

C$ = IJKLMNOPQRST LENGTH OF C$ = 12 

D$ = UV W X Y Z LENGTH OF D$ = 11 
LWRCS(AS) 


The lower-case equivalent of the value of A$. 


Example: 


A$ = "ABCDEF123” 
PRINT LWRC%(A$) 


Execution of this example gives the following output: 
abcdef123 
ORD(AS) 


The ordinal position of the character associated with A$ in the collating sequence of the declared char- 
acter set, where the first member of the character set is in ordinal position zero. The acceptable values 
of A$ are the single character graphics of the character set and the 2- and 3-character mnemonics 
of the character set. The acceptable values for the character sets are shown in Tables E-1 and E-2. 
If the character associated with A$ is not an acceptable value, a fatal error occurs. 
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Example: 


OPTION COLLATE STANDARD 

PRINT "THE ORDINAL POSITION OF BS IS”;ORD("BS”) 
PRINT "THE ORDINAL POSITION OF A IS’;ORD("A") 
PRINT “THE ORDINAL POSITION OF 5 IS”;ORD("5”) 
PRINT "THE ORDINAL POSITION OF SOH IS’;ORD("SOH") 


Execution of the above example produces the following output: 


THE ORDINAL POSITION OF BS IS 8 
THE ORDINAL POSITION OF A IS 65 
THE ORDINAL POSITION OF 5 IS 53 
THE ORDINAL POSITION OF SOH IS 1 


POS(A$,B$) 


The character position in A$ where B$ occurs. The leftmost character in A$ is position 1. If B$ does 
not occur within A$, then POS(A$,B$) is 0. POS(A$,””) is 1 unless A$ is the null string, in which 
case POS(A$,””) is 0. 


Example: 


PRINT "CD OCCURS IN ABCDE AT POSITION”; POS("ABCDE”,”CD") 
A$ = "FOUR SCORE AND SEVEN YEARS AGO...” 
PRINT ”"R OCCURS IN A$ AT POSITION’;POS(A$,"R") 


Execution of this example causes the following to be output. 


CD OCCURS IN ABCDE AT POSITION 3 
R OCCURS IN A$ AT POSITION 4 


POS(AS$,B$,M) 
Same as the previous POS function except that M-1 positions are skipped before the scan of A$ begins; 
that is, scanning begins with the Mth character. The value of the function is M’—1 + POS(A- 
$(M:LEN(A$)),B$), where M’ equals MAX(1,MIN(M,LEN(A$))), and A$(M:LEN(A$)) signifies the 
Mth character position in A$ through the end. 
Example: 

LET A$ = "GRANDSTANDING’” 

PRINT POS(A$,”AN”,1) 

PRINT POS(A$,”AN”,4) 

PRINT POS(A$,”AN”,9) 


Execution of this example produces the following output: 


3 
8 
0 
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STRS$(X) 


The character string which is the numeric representation of the value associated with X. No leading 
or trailing spaces are included in the character string. 


Example: 


PRINT STR$(123.5) 
PRINT STR$(—3.14) 


Execution of this example gives the following output: 


123.5 
—3.14 


TIMES 

The time of day in 24-hour notation. For example, the value of TIME$ at 3:15 PM is 15:15:00. 
UPRCS(AS$) 

The upper-case equivalent of the value of A$. 

Example: 


A$ = "abcdef123” 
PRINT UPRC(A$) 


Execution of this example gives the following output: 


ABCDEF 123 
VAL(AS) 


Performs the inverse of STR$; has the value of the number associated with A$ if the string associated 
with A$ is a number. Leading and trailing spaces in the string are ignored. If the evaluation of the 
number results in a value which causes an underflow, the value returned is zero. If an overflow occurs, 
the largest possible value is supplied. In either case execution continues. 


Examples: 


PRINT VAL(” 123.5 ”) * 10 
PRINT VAL(" —3.14”) * 10 
PRINT VAL("2.E-99") 


Execution of these statements gives the following output: 


1235 

— 31.4 

error 15 — numeric underflow 
0 
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STRING DECLARATIONS 


String declarations may be used to specify the maximum number of characters allowed in a string 
variable and/or to specify the character set to be used in a program unit. There are two statements 
used in string declarations: the DIM statement and the OPTION statement. 


DIM Statement String Size Declaration 


The DIM statement may be used to declare a maximum size for a string variable. The necessary syntax 
follows. Other uses of the DIM statement are described in Section 6. 


<string-variable> is defined under Variables in this section. <integer> is any integer from 0 to 255 
inclusive, and specifies the maximum number of characters allowed in <string-variable>. <string- 
variable> can appear only once in a size declaration in a program. 


Syntax: 


G18016 


Examples of size declarations: 


DIM A$*7 !Max size for A$ is 7. 


DIM B1$*80, Z$*10 !Max size for B1$ and Z$ are 80 
'and 10, respectively. 


OPTION Statement For Strings 


The OPTION statement may be used to specify which character set is used in a program unit. (Refer 
to Section 6 for descriptions of other uses of the OPTION statement.) The syntax for the OPTION 
statement when used with strings follows. 


Syntax: 
OPTION COLLATE sa NATIVE oe | 
STANDARD 
G18017 
Semantics: 


The COLLATE option identifies the collating sequence to be used within a program unit for comparing 
strings. OPTION COLLATE NATIVE specifies that the native collating sequence on the computer be 
used. For the B 1000 systems the native collating sequence is EBCDIC. Table E-2 contains the EBCDIC 
character set. OPTION COLLATE STANDARD specifies that the collating sequence ISO International 
Reference Version be used. Table E-1 contains the ISO character set. The default character set is the 
STANDARD character set. 
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SECTION 6 
ARRAYS 


Arrays are indexed collections of numbers or strings. The indices, referred to as subscripts in this man- 
ual, are used to reference one of the elements of the array. Array elements can be manipulated one 
at a time or an entire array can be manipulated by MAT statements. The keyword MAT derives from 
the word matrix. A matrix is a 2-dimensional array, but is used in this manual to denote both 1- 
and 2-dimensional arrays. 


ARRAY DECLARATIONS 


Array declarations may be used to specify the dimension bound(s) of an array. There are two state- 
ments used to declare array dimension bounds: the DIM statement and the OPTION statement. 


DIM Statement Array Size Declaration 


The DIM statement is used to specify the upper-dimension bound(s) of the subscript(s) of an array 
and/or to limit the maximum length of a string variable. The use of the DIM statement with string 
variables is described under DIM Statement String Size Declaration. The syntax for the DIM statement 
when used with arrays follows. 


ikon aaa Sean Sp: <stim > =) —L 


<array-name> follows the same formation rules as a simple variable name; that is, a letter, optionally 
followed by a digit, followed by a dollar sign ($) if the array is to contain string data. <row> and 
<column> must be nonnegative integers. If both <row> and <column> are present, they must be 
greater than or equal to the base for arrays in the program. Refer to the OPTION statement in this 
section for more information on the base for arrays. 


Syntax: 


G18018 


The declaration for an array, if present, must occur in a lower-numbered line than any reference to 
that array or to one of its elements. An array may be dimensioned only once in a DIM statement in 
each program. 


Semantics: 


Each array declaration occurring in a DIM statement declares the array named to be either 1- or 2- 
dimensional, according to whether one or two <integer>s are specified within the parentheses fol- 
lowing the array name. These <integer>s specify the upper bounds of the array, the maximum values 
that subscripts for the array may have. There may be a maximum of two subscripts for any array. 
The first subscript represents the rows, the second represents the columns. 


If the declaration for a string array in a DIM statement contains a string size declaration as described 


under DIM Statement String Size Declaration in Section 5, the maximum length of any character string 
associated with any element of that string array is the specified value. 
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according to their use in the program: if one subscript appears in an array reference, the array is 1- 
dimensional; if two subscripts appear, the array is 2-dimensional. If no subscripts appear in the array 
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Arrays in this section for more information on the BASE option. 


Examples of DIM statements: 


OPTION BASE 1 ! Lower-dimension bound is 1. 
DIM A(6), B(9,10) !A is 1-dimensional with 6 elements. 


!B is 2-dimensional with 9*10 elements. 


!Refer to Figure 6-1. Element 
'(8,2) is marked. 


DIM A$(4,4), B$(100)*5 !A$ is 2-dimensional with 4*4 
‘elements. B$ is 1-dimensional 
with 100 elements. Maximum 
'element size is 5S. 


DIM P$(10,10)*10, C(S0,2) !String array P$ is 2-dimensional 
'with 10*10 elements. Maximum 
felement size is 10. Numeric 
tarray C is 2-dimensional with 
150*2 elements. 


1 2 3 5 6 7 8 9 10 


G18019 


Element (8,2) is marked. 


Figure 6-1. Representation of a 9 by 10 Array (OPTION BASE 1) 
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OPTION Statement For Arrays 


The OPTION statement may be used to change the value of the lower-dimension bounds for arrays 
in a program. The syntax follows. 


Syntax: 


OPTION 


oe 7 re 
1 
G18020 


Semantics: 


If an OPTION statement specifies that the lower bound for array subscripts is 1, then no DIM state- 
ment in the program can specify an upper bound of 0. 


The OPTION statement with a BASE option, if present, must occur in a lower-numbered line than 
any DIM statement or any reference to an array in the program. Only one BASE option may occur 
in a program. If no OPTION BASE occurs in the program, the base defaults to zero. 


Examples of OPTION statements: 


OPTION BASE 1 !Lower dimension bound for arrays is 1. 
OPTION COLLATE NATIVE, !Collating sequence used in string comparisons 
BASE 1 ! is EBCDIC. Lower-dimension bound is 1. 


NUMERIC ARRAY MANIPULATION 


BASIC provides several statements to manipulate an entire array, rather than just one array element 
at a time. The statements available for numeric array manipulation are explained in this subsection. 
These statements follow normal rules of matrix algebra. 


In all numeric array manipulation statements, overflow and underflow are reported to the user and 
program execution continues. With overflow, the value 7.237E +75 is substituted. With underflow, zero 
is substituted. 


MAT Addition Statement 


The purpose of the MAT addition statement is to add two numeric arrays and to assign the sum to 
a third array. The syntax follows. 


Syntax: 


MAT < array-namel > = < array-name2 > + < array-name3 > i io 


G18021 
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<array-namel>, <array-name2>, and <array-name3> follow the same formation rules as a simple 
variable name. 


Semantics: 


<array-namel > is assigned the sum of <array-name2> and <array-name3>. If <array-namel > 
does not have the same dimensions as <array-name2> and <array-name3>, it may be redimen- 
sioned. Rules for redimensioning are described under the MAT assignment statement in this section. 
<array-name2> and <array-name3> must have the same dimensions. <array-namel> and <array- 
name2> may be the same array. 


Examples of the use of the MAT addition statement: 


OPTION BASE 1 
DIM A(3,3) BG3,3), C(3,3) 
MAT READ A,B 


MAT PRINT A; MAT PRINT statement — Section 9 
PRINT 

PRINT “ARRAY B IS’ 

MAT PRINT B; 

PRINT 

PRINT “ARRAY C IS” 

MAT C = A +B 

MAT PRINT C; 


Execution of the above example causes the following to be displayed. 


ARRAY A IS 


So — 
Coun po 
LO ON 


6 10 14 
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MAT Assignment Statement 


The purpose of the MAT assignment statement is to move the elements of one array to the elements 
of another array. 


Syntax: 


MAT < array-namel > = <array-name2 > TT 


G18022 


<array-namel> and <array-name2> follow the same naming conventions as simple numeric 
variables. 


Semantics: 


<array-namel> and <array-name2> must have the same number of dimensions but not necessarily 
the same upper bounds on those dimensions. If the upper-dimension bounds are different, <array- 
namel > may be redimensioned to match <array-name2>. This is known as dynamic redimensioning. 
Dynamic redimensioning takes place only if (1) the original total number of elements in <array- 
namel> is greater than or equal to the total number of elements in <array-name2> and (2) the num- 
ber of dimensions of <array-namel > and <array-name2> are the same. Otherwise, a fatal error oc- 
curs. 


When a numeric array is redimensioned dynamically, the current upper bound for each subscript is 
changed to match the size of its new value and the current lower bound for each subscript stays the 
same. . 


Example of a numeric array assignment statement with redimensioning: 


DIM B(4,4) 

MAT READ A(2,2) 
DATA 1,2,3,4 
MATB =A 
MAT PRINT B; 


Execution of the example above causes the following to be displayed. 


jy 2 
3 4 


MAT CON Statement 


The MAT CON statement initializes all of the data elements of an array to the numeric constant 1 
or to the value of a numeric expression. The MAT CON statement may also be used to redimension 
an array. The syntax of the MAT CON statement follows. 
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Syntax: 


MAT < array-name > = ( < numeric-expression > ) * 
>——— CON ( < subscript > “ie > < subscript a ta ) 


G18023 


<array-name> follows the same naming conventions as simple numeric variables. <numeric-expres- 
sion> is described under Numeric Expressions in Section 4. 


Semantics: 


If present, the <numeric-expression> is evaluated and used in place of the numeric constant | to ini- 
tialize each element of the array. 


The <subscript >s must be greater than or equal to the lower-dimension bound for arrays in the pro- 
gram unit where the MAT CON statement occurs. If one or both of the <subscript>s are present, 
a redimension is implied. Arrays are redimensioned in the same manner as described for the MAT as- 
signment statement in this section. 


Example of the use of the MAT CON statement: 


OPTION BASE 1 

DIM A@,5) 

MAT A = CON 

MAT PRINT A; 

PRINT 

MAT A = (2) * CONQG,3) 
MAT PRINT A; 


Execution of this example gives the following output: 


1 11411 
br. doh de sk 
1114141 
2. 2 2 
De ay 
tay ae: 


DOT Function 
The DOT function produces the dot product of two 1-dimensional arrays. 


Syntax: 


DOT ( <array-name > > <array-name > ) — 


G18024 
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<array-name>s follow the same formation rules as a simple numeric variable and must be singly sub- 
scripted numeric arrays. 


Semantics: 
The dot product is the sum of the products of each of the corresponding elements of the arrays. 
Example of the use of the DOT function: 
OPTION BASE 1 
DIM A(2), B(2) 
DATA 2,3,4,3 
MAT READ A, B 
PRINT DOT(A,B) 
Execution of this example produces the following output: 
17 
MAT IDN Statement 


The MAT IDN statement zeros a square array and places the integer 1 or the value of a numeric ex- 
pression in each element on the main diagonal. 


MAT < array-name > = ( < numeric-expression > ) —— * 
— of EE ee 


G18025 


Syntax: 


<array-name> follows the same naming conventions as simple numeric variables. <array-name> 
must be a square array or must be redimensioned to be a square array. In a square array, the upper- 
dimension bounds are equal to each other. <numeric-expression> is described under Numeric Expres- 
sions in Section 4. 


Semantics: 


<numeric-expression >, if present, is evaluated and used as the value for each element of the array 
instead of the integer 1. The <subscript>s must be greater than or equal to the lower-dimension 
bound for arrays in the program unit where the MAT IDN statement occurs. The subscripts, if present, 
imply a redimension of <array-name>. 


Examples of MAT IDN statements: 


OPTION BASE 1 
DIM X(3,3) 

MAT X=IDN 

MAT Y =(10)*IDN(4,4) 
MAT PRINT X: Y; 
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Execution of this example causes the following to be displayed. 


1 0 0 
0 1 0 
O80: 4 
10° OG <Q 
0 10 0 9 
0 9 10 0O 
0 0 9 10 


MAT INV Function 


The MAT INV function produces the inverse of a square array. The syntax of the MAT INV function 
follows. 


Syntax: 
-~—— MAT —— <array-name1> —— = —— INV ——(< array-name2>) —| 


<array-name2> must be a square array. Both <array-namel > and <array-name2> must follow the 
same formation rules as used for simple numeric variables. 


Example of the MAT INV function: 
MAT A = INV(B) 
Assume that array B contains the following values: 
1 2 
7 
Execution of this example results in array A receiving the following values: 


Ly 2 
a5 1 


MAT Multiplication Statement 


The purpose of the MAT multiplication statement is to multiply two numeric arrays and to assign the 
product to a third array. 


Syntax: 


MAT < array-namel > = < array-name2 > * < array-name3 > — 


<array-namel >, <array-name2>, and <array-name3> follow the same formation rules as a simple 
variable name. 


G18026 
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Semantics: 


<array-namel > is assigned the product of <array-name2> and <array-name3>. If <array-namel > 
does not have the row dimension of <array-name2> and the column dimension of <array-name3>, 
it may be redimensioned. Rules for redimensioning are described under the MAT assignment statement 
in this section. The column dimension of <array-name2> must be the same as the row dimension 
of <array-name3 >. <array-namel>, <array-name2>, and <array-name3> may be the same array. 


When two arrays are multiplied, the dot product of the first row of the first array and of each column 
of the second array forms the first row in the answer; the dot product of the second row of the first 
array and each column of the second array forms the second row in the answer, and so on. 


Example of the MAT multiplication statement: 


OPTION BASE 1 
DIM C(2,2) 
MAT READ A(2,3), B(3,2) 


> 


5,6 
DATA 1,2, 3,4,5,6° 
* B 


PRINT "MAT A =” 
MAT PRINT A; 
PRINT 

PRINT "MAT B =" 
MAT PRINT B; 
PRINT 

PRINT "MAT C =” 
MAT PRINT C; 


Execution of this example causes the following to be displayed. 


MAT A = 
I “2. 3 


= 
wT 
oN 
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MAT Scalar Multiplication Statement 


The MAT scalar multiplication statement allows each element of an array to be multiplied by any scalar 
number. 


Syntax: 


MAT < array-name > = | ee (<< numeric-expression >) * <array-name > SS 


G18027 


<array-name> follows the same naming conventions as simple numeric variables. The two <array- 
name>s may name the same array. <numeric-expression> is described under Numeric Expressions 


in Section 4. 


Example of the use of MAT scalar multiplication statements: 


OPTION BASE 1 

DIM AQ@3,3),B(3,3) 
MAT READ A 

DATA 1,2,3,4,5,6,7,8,9 
PRINT “ARRAY A IS” 
MAT PRINT A; 


PRINT 
PRINT "ARRAY B IS" 
MAT B = — (2)* A 


MAT PRINT B; 


Execution of this example gives the following output: 


ARRAY B IS 
-2 -4 -6 

-8 -10 -12 
-14 -16 -18 


MAT Subtraction Statement 


The purpose of the MAT subtraction statement is to subtract one array from another array and to 
assign the difference to a third array. 


Syntax: 


MAT < array-name1 > = < array-name2 > < minus-sign > < array-name3 > | 


G18028 


6-10 


B 1000 Systems Interactive BASIC (IBASIC) Language Manual 
Arrays 


<array-namel>, <array-name2>, and <array-name3> follow the same formation rules as a simple 
variable name. 


Semantics: 


<array-namel> is assigned the difference of <array-name2> and <array-name3>. If <array- 
namel> does not have the same dimensions as <array-name2> and <array-name3>, it may be redi- 
mensioned. Rules for redimensioning are described under the MAT assignment statement in this sec- 
tion. <array-name2> and <array-name3> must have the same dimensions. <array-namel> and 
<array-name2> may name the same array. 


Example of the use of the MAT subtraction statement: 


OPTION BASE 1 

DIM A(3,3), B3,3), C(3,3) 
MAT READ A,B 

DATA 1,2,3,4,5,6,7,8,9,2,4,6,8,1,3,5,7,9 
PRINT "ARRAY A JIS” 
MAT PRINT A; 

PRINT 

PRINT “ARRAY B IS” 
MAT PRINT B; 

PRINT 

PRINT "ARRAY C IS” 
MAT C = A —- B 

MAT PRINT C; 


Execution of this example gives the following output: 

ARRAY A IS 

1 2 3 

4 5 6 

7 8 9 

AR 
2Z 
8 
5 
ARRAY C IS 
-1 -2 -3 
~h 4 3 


2. 1,°0 


MAT TRN Function 
The MAT TRN function transposes its argument. The syntax of the MAT TRN function follows.. 


Syntax: 


—— MAT —— <array-name1 > —— = —— TRN —— (< array-name2>) — 
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Both <array-namel > and <array-name2> must follow the same formation rules as a simple numeric 
variable. 


Example of the MAT TRN function: 
MAT A = TRN(X) 
Assume that array X contains the following: 
7 12 5 -1 
1 2 9 3 
2 -8 6 4 


Execution of this example results in array A receiving the following values: 


7 % 2 
i 228 
5 9 6 
=! 3: 4 


MAT ZER Statement 


The MAT ZER statement initializes the elements of the specified numeric array to the numeric constant 
0, and may optionally be used to redimension the array. 


Syntax: 


MAT < array-name > = ( <numeric-expression > ) k 
— See ne 


G18029 


<array-name> follows the same naming conventions as simple numeric variables. <numeric-expres- 
sion> is described in Section 4. 


Semantics: 


The <subscript >s must be greater than or equal to the lower-dimension bound for arrays in the pro- 
gram unit where the MAT ZER statement occurs. If one or both of the <subscript>s are present, 
a redimension is implied. Arrays are redimensioned in the same manner as described for the MAT as- 
signment statement in this subsection. <numeric-expression> has no effect on the execution of this 
statement. 
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Examples of the MAT ZER statement: 


OPTION BASE 1 
DIM A(2,10) 

MAT A = ZER 
MAT PRINT A; 
PRINT 

MAT A = ZER(4,2) 
MAT PRINT A; 


Execution of this example gives the following output: 


000000 0 0 0 
00000 0 0 0 0 


oooco on aw) 
oo oo 


STRING ARRAY MANIPULATION 


As with numeric arrays, an entire string array may be operated upon, rather than just one element. 
The statements available for string array manipulation are described in this subsection. 


MAT Assignment Statement 


The purpose of the MAT assignment statement is to move the elements of one array to the elements 
of another array. 


Syntax: 


MAT < array-namel > = <array-name2 > —o 


G18022 


<array-namel > and <array-name2> follow the same naming conventions as simple string variables. 
Semantics: 


<array-namel> and <array-name2> must have the same number of dimensions but not necessarily 
the same upper bounds on those dimensions. If the upper-dimension bounds are different, <array- 
namel> is redimensioned to match <array-name2>. This takes place only if (1) the original total 
number of elements in <array-namel> is greater than or equal to the total number of elements in 
<array-name2> and (2) the number of dimensions of <array-namel> and <array-name2> are 
equal; otherwise, a fatal error occurs. 


When a string array is redimensioned dynamically, the current upper bounds for its subscripts are 
changed to match the size of its new value and the current lower bounds stay the same. 
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Example of the use of a string array assignment statement: 


OPTION BASE 1 

DIM Z$(3,4) 

DATA AARDVARK,NEXT STRING, 123456789, FOURTH,ELEPHANT , TACK 

DATA COZUMEL, WRITE RING,''NO CABO.'',''NO! NO QUEPO,'"' 

DATA ''TU TAMPOCO?'', END 

MAT READ ZS$ 

MAT YS = Z$ 

MAT PRINT YS 

PRINT Nowak ene |e ke -- 2 -- kB - Kk -- - - ek - 8 om ne wt 


Execution of this example gives the following output: 


AARDVARK NEXT STRING 123456789 FOURTH 
ELEPHANT TACK COZUMEL WRITE RING 
NO.CABO. NO! NO QUEPO. TU TAMPOCO? END 

wn en Ke nnn | ne 2 a ne Fo ek ek 5-H 


MAT NULS Statement 


The MAT NUL4$ statement assigns the null string to each element of a string array. MAT NULS$ may 
also be used to redimension an array. 


Syntax: 


MAT < array-name > = NUL$ ( < subscript oe > < subscript > iy ) 


G18030 
<array-name> must follow the same naming conventions as simple string variables. 


Semantics: 


The <subscript >s must be greater than or equal to the lower-dimension bound for arrays in the pro- 
gram unit where the MAT NULS® statement occurs. If one or both of the <subscript>s are present, 
a redimension is implied. Arrays are redimensioned in the same manner as described for the MAT as- 
signment statement in this subsection. 


Examples of the MAT NULS statement: 


MAT A$ = NULS$ ! Each element in A$ gets the null 
! string. 


MAT B$ = NULS(5,6) ! Each element is B$ gets the null 


! string and the array is redimensioned 
! to a 5 by 6 array. 
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SECTION 7 
CONTROL STRUCTURES 


Normally, the executable statements in a BASIC program are executed in line number sequence; that 
is, after one statement is executed, the statement immediately following it is executed. Control state- 
ments are used to alter the normal flow of a program. They may transfer the control to another part 
of the program, terminate program execution, or control iterative processes. The control structures 
available in Burroughs B 1000 BASIC and the expressions that are used in several of these structures 
are described in this section. 


RELATIONAL EXPRESSIONS 


Relational expressions enable the values of expressions to be compared in order to influence the flow 
of control in a program unit. 


Syntax: 


“To <exp><rel> <exp> kk = = 
NOT ( <relational-expression > ) 


edt ae 
OR NOT ( < relational-expression > ) 
G18031 


<exp> is either a string or a numeric expression as described in sections 4 and 5, respectively. <rel> 
is a relational symbol as listed in table 7-1. The appearance of <relational-expression> within paren- 
theses indicates that a relational expression can be used as an operand in a larger relational expression. 
This also allows for the nesting of parentheses in a relational expression. 


Table 7-1 lists the valid relational symbols. 


Table 7-1. Relational Symbols 


Symbol(s) Meaning 
= equal to 
<> or >< not equal to 
< less than 
> greater than 
<= or =< less than or equal to 
>= or => greater than or equal to 
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Semantics: 


Two numeric expressions are considered equal only if the expressions have the same value. Two string 
expressions are considered equal only if the values of the two expressions have the same length and 
contain identical sequences of characters. 


In the evaluation of string relational expressions, the relation "less than” means "earlier in the collating 
sequence than,” and “greater than” means “later in the collating sequence than.” If two strings of dif- 
ferent lengths occur in a relational expression and one is an initial leftmost segment of the other, the 
shorter string is less than the other. Otherwise, the relationship between two strings of unequal length 
is determined by the contents of the shorter string and the leftmost portion of the longer string which 
is the same length as the shorter string. 


The following portion of the relational expression syntax is considered a relational term. 


Syntax: 


i ao <exp><rel> <exp> om + 
NOT ) 


( < relational-expression > 


A relational expression involving relational terms connected with the AND operator (conjunction) is 
TRUE if the value of each relational term is TRUE. A relational expression involving relational terms 
connected with the OR operator (disjunction) is TRUE if at least one of the relational terms is TRUE. 
The relational terms of conjunctions and disjunctions are evaluated in sequence from left to right until 
the truth or falsity of the entire relational expression is determined. A relational term beginning with 
the NOT operator is TRUE if, and only if, the following portion of the relational term is FALSE. 


In the absence of parentheses, the NOT operator is evaluated first, then the AND operator, and finally 
the OR operator. 


Examples of relational expressions: 


A <B !A is less than B. 

A >=C !A is greater than or equal to C. 

A <= X AND X <= B !A is greater than or equal to X and X is less than or 
!equal to B. 

A$ = B$ OR A$ = "” !A$ equals BS or A$ equals null string. A<B AND 


'B<C AND C<D A is less than B and B is less than C 
!and C is less than D. 


I <= 10 AND A() <> 0 'T is less than or equal to 10 and A(I) is not equal to 0. 
'if I is greater than 10, the 


xX <> 0 OR (C$ = "MULTIPLY" AND NOT D§ = "SUM") 
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CONTROL STATEMENTS 


Control statements permit the interruption of the normal sequence of execution of statements and cause 
execution to continue at a specified line, rather than at the line with the next line number in line num- 
ber sequence. 


GOTO Statement 
The GOTO statement causes an unconditional transfer of control. 


Syntax: 


GOTO < line-number > ———————_ ——_| 


<line-number > is described under Lines in Section 3. Execution of a GOTO statement causes program 
execution to continue at the line with the specified <line-number>. 


G18032 


Semantics: 


<line-number> must not cause a jump into a FOR NEXT loop (refer to FOR NEXT structure in 
this section) or a user-defined function. 


Examples of GOTO statements: 


GOTO 100 
GO TO 5550 


GOSUB and RETURN Statements 
The GOSUB and RETURN statements allow for subroutine calls. 


Syntax for GOSUB: 


GOSUB < line-number > ———_—_- TT 7->7 


Syntax for RETURN: 


RETURN —————————__ iia cach a 
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<line-number> is described under Lines in Section 3. 
Semantics: 


Execution of a GOSUB statement causes program execution to continue at the line with the specified 
<line-number>. <line-number> must not cause a jump into a FOR NEXT loop or a used-defined 
function. 


Execution of a RETURN statement causes execution to continue at the line immediately following the 
GOSUB statement. GOSUB and RETURN statements may be nested; that is, one set of statements 
may be contained within another set. 
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For every RETURN statement executed there must be at least one GOSUB statement for which no 
RETURN has been executed. 


Example of GOSUB and RETURN statements: 


100 GOSUB 5160 
110 REM -- THE RETURN STATEMENT TRANSFERS CONTROL HERE 


5160 REM -- THE GOSUB STATEMENT TRANSFERS CONTROL HERE 


5300 RETURN 
ON GOTO Statement 


The ON GOTO statement allows control to be transferred to any one of a group of line numbers. 


ON < index > GOTO fT < line-number > ELSE < statement > 


<index> is a numeric expression as described in Section 4. <index> is rounded to obtain an integer: 
INT( < index > + 0.5). <line-number> is described under Lines in Section 3. <statement>, if pres- 
ent, can be any BASIC statement except the following: 


Syntax: 
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IF 
FOR or NEXT 
DIM 


IMAGE 

DEF or FNEND 
END 

REM 

ON 


Semantics: 


When an ON GOTO statement is executed, the <index> is evaluated and used as an index into the 
list of <line-numbers>. The list of <line-number>s is numbered from left to right, starting with the 
integer 1. If an ELSE occurs, the <statement> following the ELSE is executed if the value of <in- 
dex> is less than 1 or greater than the number of <line-number>s in the list. If there is no ELSE 
clause (ELSE part) and <index> is less than 1 or greater than the number of <line-number>s in 
the list, a fatal error occurs. 


Examples of ON GOTO statements: 
ON L+1 GOTO 400, 400, 500 
ON X GOTO 100, 200, 150, 9999 ELSE LET A = 1 
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In the first statement, if L = 0 or L = 1, line 400 is the next line executed. If L = 2, line 500 is 
executed next. Any other value for L causes a fatal error. 


In the second statement, if X = 1, statement 100 is executed next. If X = 2, statement 200 is executed 
next. If X = 3, statement 150 is executed next. If X = 4, statement 9999 is executed next. If X is 
none of these values, variable A is assigned the value 1 and execution continues with the statement 
following the ON GOTO statement. 


ON GOSUB and RETURN Statements 


The ON GOSUB and RETURN statements allow control to be transferred to and from any one of 
a group of subroutines. 


Syntax: 


ON <index > GOSUB = <line-number > 


ELSE <statement > 
G18036 


The syntax for the RETURN statement is the same as listed under GOSUB and RETURN Statements 
in this section. 


<index> is a numeric expression as described in Section 4. <index> is rounded to obtain an integer: 
INT( < index > + 0.5). <line-number> is described under Lines in Section 3. <statement>, if pres- 
ent, can be any BASIC statement except the following: 


IF 

FOR or NEXT 
DIM 

OPTION 

DATA 

IMAGE 

DEF or FNEND 
END 

REM 

ON 


Semantics: 


When an ON GOSUB statement is executed, the <index> is evaluated and used as an index into the 
list of <line-numbers>. The list of <line-number>s is numbered from left to right, starting with the 
integer 1. If an ELSE occurs, the <statement> following the ELSE is executed if the value of <in- 
dex> is less than 1 or greater than the number of <line-number>s in the list. If there is no ELSE 
clause and <index> is less than 1 or greater than the number of <line-number>s in the list, a fatal 
error occurs. 


Examples of ON GOSUB and RETURN statements: 


ON A+7 GOSUB 1000, 2000, 7000, 4000 
ON F1-2 GOSUB 4360, 4460, 4660 ELSE PRINT F1 
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In the first statement, if A = -—6, line 1000 is executed next. If A = —5, line 2000 is executed next. 
If A = —4, line 7000 is executed next, and if A = —3, line 4000 is executed next. Any other value 
for A causes a fatal error. 


In the second statement, if Fl = 3, line 4360 is executed next. If Fl = 4, line 4460 is executed next. 
If Fl = 5, line 4660 is executed next. If Fl is none of these values, variable F1 is displayed and execu- 
tion continues with the statement following the ON GOSUB statement. 


LOOP STRUCTURES 


Loop structures provide for the repeated execution of a sequence of statements. There are two loop 
structures available in B 1000 IBASIC: the FOR NEXT structure and the DO LOOP structure. 


FOR NEXT Structure 


The FOR NEXT structure provides for the construction of counter-controlled loops. 


Syntax for the FOR statement: 


FOR <control-var > = <initial-value > TO <limit > oc a STEP ales 


Syntax for the NEXT statement: 


NEXT <control-var => ———-—-—__- | 
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The FOR and NEXT statements must occur in corresponding pairs. <control-var> is a simple numeric 
variable, and must be the same variable in corresponding FOR and NEXT statements. <initial-value>, 
<limit>, and <increment> are numeric expressions. If the STEP clause is omitted, <increment > 
defaults to 1. 


There may be any number of BASIC statements between corresponding FOR and NEXT statements. 
These statements, plus the FOR and NEXT statements, comprise a FOR block. A FOR block may 
contain any BASIC statement except an END statement. 


Semantics: 


The FOR NEXT structure allows a group of statements to be executed a specified number of times. 
The action of the FOR NEXT structure can be defined in terms of other BASIC statements as follows. 


FOR NEXT structure: 
10 FOR C = I1 TO L STEP [12 


(BASIC statements) 
100 NEXT C 
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Equivalent BASIC statements: 


10 LET X1 L 

20 LET X2 12 

30 LET C = Il 

40 IF (C—X1) * SGN(X2) > 0 THEN GOTO 100 
(BASIC statements) 

80 LET C = C + X2 

90 GOTO 40 

100 REM -- REMAINDER OF PROGRAM UNIT 


lt 


Within the body of the FOR NEXT structure the value of <control-var> may be changed. Any such 
change may affect the number of times that the body is executed. The numeric expressions < initial- 
value>, <limit>, and <increment> may also be changed in the body if simple numeric variables 
are used for these expressions, but changes to these variables do not affect the number of times that 
the body is executed. 


FOR NEXT structures may be nested, but nested FOR NEXT structures must use different <control- 
var >s. When nesting is used, the innermost structure must be completely terminated before any of 
the outer structures are terminated. 


A line number within the body of a FOR NEXT structure cannot be referred to outside of that struc- 
ture by a GOTO, GOSUB, ON, or IF statement. 


Examples of FOR NEXT structures: 


FOR I = 1 TO 10 
LET Ad) = I 
NEXT I 


FOR C7 = A TO B STEP -1 
C$(C7) = D$ 
PRINT C$(C7) 

NEXT C7 


Example of the use of nested FOR NEXT structures: 


OPEN #1: “INFILE”, INTERNAL, INPUT OPEN statement — Section 9 
DIM A(100,100) 
FOR I = 1 TO 100 
FOR J = 1 TO 100 
INPUT #1: Ad,J) 
NEXT J 
NEXT I 


The first FOR NEXT structure initializes elements one through ten of array A to the values 1 through 
10. 


The second FOR NEXT structure is similar to the first in that an array is being initialized, but in this 
example, the initial and limiting values are variables instead of constants as in the first example. This 
example also shows the use of the STEP clause with a negative increment. 


The example of the nested FOR NEXT structures shows how a 2-dimensional array, A, can be easily 
loaded from a disk file. The description of statements used with disk files is in Section 9. 
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DO LOOP STRUCTURE 


The DO LOOP structure provides for the repeated execution of a sequence of statements with arbitrary 
exit conditions. 


Syntax for the DO statement: 


DO 


WHILE TT < relational-expression > 
UNTIL 


Syntax for the LOOP statement: 


LOOP 


WHILE = <relational-expression > 
UNTIL 


The DO and LOOP statements must occur in corresponding pairs. <relational-expression> is any rela- 
tional expression as described in this section. 


Any number of BASIC statements can appear between the corresponding pairs of DO and LOOP state- 
ments, including any number of EXIT statements. The EXIT statement provides a method for exiting 
the loop structure on a specified exit condition. 


Syntax for the EXIT statement: 


EXIT IF < relational-expression > $$$ $$$ _____ if 


<relational-expression> is any relational expression as described in this section. 
Semantics: 


The DO LOOP structure provides for repeated execution of a group of BASIC statements until an 
exit condition requires an exit of the loop structure. An exit condition requires an exit from the loop 
in any one of the following cases:(1) the value of the <relational-expression> following the WHILE 
keyword is FALSE, (2) the value of the <relational-expression> following the UNTIL keyword is 
TRUE, or (3) the value of the <relational-expression> following the EXIT IF keywords is TRUE. 


If the execution of a program reaches a DO statement, the <relational-expression> in that statement, 
if present, is evaluated. If there is no <relational-expression> or if the <relational-expression> does 
not require an exit from the loop, execution proceeds to the next line. If the <relational-expression > 
requires an exit from the loop, execution continues at the line following the associated LOOP state- 
ment. 


If the execution of a program reaches an EXIT statement, the <relational-expression> in that state- 
ment is evaluated. If the <relational-expression> does not require an exit from the loop, execution 
proceeds to the next line. If the <relational-expression > requires an exit from the loop, execution con- 
tinues at the line following the associated LOOP statement. 
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If the execution of a program reaches a LOOP statement, the <relational-expression> in that state- 
ment, if present, is evaluated. If there is no <relational-expression> or if the <relational-expression > 
does not require an exit from the loop, execution proceeds to the associated DO statement. If the <re- 
lational-expression> requires an exit from the loop, execution continues at the line following the asso- 
ciated LOOP statement. 


Examples of DO LOOP structures: 


DO UNTIL I = 72 


AS(:D = "*" 
I=I1+ 1 
LOOP 
DO 


INPUT PROMPT "ENTER INTEGER BETWEEN 1 AND 100”: X 
EXIT IF 1 <= XK AND X < 101 AND X = INT(X) 
PRINT "TRY AGAIN.” 

LOOP 


DECISION STRUCTURES 


Decision structures permit the conditional execution of statements. There are three decision structures 
available in B 1000 IBASIC: 1) the IF statement, 2) the block IF structure, and 3) the SELECT CASE 
structure. These decision structures are described in the following paragraphs. 


IF Statement 


The IF statement permits conditional transfer of control or conditional execution of a statement. The 
syntax and semantics of the IF statement follow. 


Syntax: 


IF <rel-exp >> THEN i ie <line-nol > ELSE oe ee 
—— <stmt1 —- < stmt2 > 


<rel-exp> is a relational expression as described under Relational Expressions in this section. <line- 
nol> and <line-no2> represent line numbers which refer to lines in the same program unit. 
<stmtl> and <stmt2> are any BASIC statements except the following: 
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IF 

FOR or NEXT 
DIM 

OPTION 

DATA 

IMAGE 

DEF or FNEND 
END 

REM 

ON 
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Semantics: 


When the IF statement is executed, <rel-exp> is evaluated. If the expression is TRUE, <stmtl> is 
executed or control is transferred to <line-nol>. If the expression is FALSE, <stmt2> is executed 
or control is transferred to <line-no2>. 


Examples of IF statements: 


IF A < B THEN 100 
IF A$ <> B$ THEN 250 
IF A > 1ANDA < 2 THEN 100 ELSE 200 
IF X => Y2 THEN GOSUB 900 ELSE GOSUB 2000 
IF X$ <> “NO” OR X$ = “STOP” THEN LET A = 1 
IF A$(3:7) = "CAT" THEN 1000 ELSE PRINT "ERROR #105” 
IF X <> 0 OR (C$ = “MULTIPLY” AND NOT D$ = “SUM") THEN 330 


BLOCK IF Structure 


The block IF structure permits the conditional execution of a sequence of statements. The syntax and 


semantics of the block IF structure follow. 
< statement> + 


TT Sa eal ie IF — 


<rel-exp> is a relational expression as described under Relational Expressions in this section. <eol> 
represents end-of-line and signifies that any subsequent items must begin on a new line. <statement > 
is any BASIC statement. If <statement> is a BASIC statement that must be accompanied by another 
BASIC statement in order to be complete, then the accompanying statement must occur before the 
ELSE statement, if present, or before the END IF statement if there is no ELSE statement. 


Syntax: 


—— IF —— <rel-exp> —— THEN —— < eol> —— 


Line numbers in a statement outside the block IF statement must not refer to a statement within the 
block IF group. 


NOTE 
This construct requires several lines for entry. Each new line must begin with 
a line number and only one statement can occur on a line. For example, END 
IF must be entered on a separate line from the preceding statement and must 
have its own line number. 
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Semantics: 


If the value of <rel-exp> in the block IF statement is TRUE, the block of statements following the 
THEN is executed. If the value of <rel-exp> is FALSE, the block of statements following the ELSE, 
if present, is executed. After the appropriate THEN block or ELSE block has been executed, execution 
continues at the line following the END IF statement. 


Example of the block IF structure: 


IF X = INT(X) THEN !X is tested for an integer value. 
PRINT X; "IS AN INTEGER.” 'if X is not an integer, that is, 
A= A+ 1 'a real value, the statements 

ELSE 'following ELSE are executed; 
PRINT X; “IS NOT AN lotherwise,the statements follow- 
INTEGER.” ting THEN are executed. 
A=A- 1 

END IF 


Select Case Structure 


The SELECT CASE structure permits the conditional execution of any one of a number of alternative 
sequences of lines. The syntax and semantics of the SELECT CASE structure follow. 


Syntax: 
—— SELECT —— < expression> —— < eol> —~> 
>-——- CASE < constant > LL < eol> < statement > = 


— < constant > —— TO 


< less-than-sign > 


< greater-than-sign > 


CASE ELSE —— <eol> 


< statement> 


<expression> is either a numeric expression as described under Numeric Expressions in Section 4, or 
a string expression as described under String Expressions in Section 5. <eol> represents end-of-line 
and signifies that any subsequent items must begin on a new line. <constant> is either a numeric 
constant as described under Numeric Constants in Section 4 or a string constant as described under 
String Constants in Section 5. <statement> is any BASIC statement. If <statement> is a BASIC 
statement that must be accompanied by another BASIC statement in order to be complete, then the 
accompanying statement must occur before the ELSE statement, if present, or before the END IF state- 
ment if there is no ELSE statement. 
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Line numbers in a statement outside the SELECT CASE structure must not refer to a statement within 
the structure. 


NOTE 
This construct requires several lines for entry. Each new line must begin with 
a line number and only one statement can occur on a line. For example, END 
SELECT must be entered on a separate line from the preceding statement 
and must have its own line number. 


Semantics: 


When a SELECT CASE structure is executed, <expression> is evaluated and compared with each of 
the case items in the order in which they occur. A match between <expression> and a case item oc- 
curs according to the following table: 


Match Criteria 


Case Item <expression> Value 
<constant > Equal to <constant > 
<constant> TO Greater than or equal to first 
< constant > < constant > 
and less than or equal to second 
< constant > 

> <constant > Greater than <constant> 

< <constant > Less than <constant > 


If a match is found, the block of <statement>s (case block) immediately following the CASE state- 
ment where the match occurred and immediately preceding the next CASE statement or the END SE- 
LECT statement is executed. If no case item is matched, the case block headed by CASE ELSE, if 
it occurs, is executed. If no case item is matched and there is no CASE ELSE clause, a fatal error 
occurs. 


Example of a SELECT CASE structure: 


SELECT A$ 
CASE “"A™ TO “LZ"™s "a™ TH "Zz" 
PRINT ASs “ STARTS WITH A LETTER.” 
CASE... =O" 10-79" 
PRINT ASs ™ STARTS WiTH A DIGIT.” 
PRINT “THE DIGIT IS "+s A$C121) 


CASt ELSE 
PRINT ASs ™ OOESN*T START WITH A LETTER OR A DIGIT.” 
END SELECT 
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SECTION 8 
PROGRAM PARTITIONING 


Burroughs B 1000 BASIC provides two facilities to partition programs. The first facility enables the 
user to define functions. These user-defined functions are used in numeric and string expressions in 
the same manner as the intrinsic numeric and string functions. The second facility, the CHAIN state- 
ment, enables separate programs to be executed sequentially without user intervention. 


USER-DEFINED FUNCTIONS 


There are two types of user-defined functions: single-statement functions and multiple-statement func- 
tions. Each type may be either a numeric or a string function. 


Single-Statement Functions 


A single-statement function is a user-defined function that requires only one statement for its defini- 
tion, the DEF statement. The function definition specifies the method of evaluating the user-defined 
function based on the values of the parameters, if any. The syntax of the DEF statement for a single- 
statement function definition follows. 


Syntax: 


Ne ee ee a 


6 + 
aa ae ( tem ~y_ = <expression > ———_ 


G18040 


<letter> is any English alphabet letter from A to Z. <digit> is any decimal digit. Spaces may not 
occur between FN and <letter>, between: <letter> and <digit>, nor between <digit> and $. The 
entities FN, <letter>, <digit>, and $, are referred to as the function name. <parameter> is a sim- 
ple variable. <expression> is either a string or numeric expression. <expression> may not reference 
the function being defined; that is, recursion is not allowed in single-statement functions. 


Semantics: 


When a user-defined function is referenced, that is, when its name occurs in an expression, any argu- 
ments in the function reference are evaluated and their values are assigned to the parameters which 
appear in the function definition (parameters are passed by value to functions). After the arguments 
are passed, the expression associated with the function is evaluated and its value is assigned as the value 
of the function. 


A <parameter> is recognized only within the function definition in which it appears, that is, 
parameters are local to the function; it is distinct from any variable with the same name outside the 
function definition. All other variables in a function definition are recognized in the entire program, 
that is, they are global to the program. 


A function is executed only when its name is referenced. If a function definition statement is reached 
in some other fashion, the function is not executed, and execution proceeds to the next line. 
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Examples of single-statement function definitions: 


DEF FNP = 3.14159 ! FNP is defined to be an 
! approximation of PI. 


DEF FNA(X) = A * X +B 
DEF FNC(A,B) = A * B+ 1 


DEF FNA$(S$,T$) = S$ & TS 


The second example defines FNA as a numeric function with one parameter. The value of the function 
is the product of A and the parameter, X, added to B. 


The third example defines FNC as a numeric function with two parameters. The value of the function 
is the product of the two parameters plus 1. 


The fourth example defines FNA$ as a string function with two parameters. The value of the function 
is the concatenation of the two parameters. 


Multiple-Statement Functions 


A multiple-statement function is a user-defined function that requires more than one statement for its 
definition. The function definition specifies the method of evaluating the user-defined function based 
on the value(s) of the parameter(s), if any. The two statements required for this definition are the DEF 
statement for multiple-statement functions and the FNEND or END DEF statements. To avoid confu- 
sion, only the one-word name FNEND is used to refer to the END DEF statement. The syntax and 
semantics of these statements follows. 


Syntax for the DEF statement: 


se Ns 
een ie 


<parameter - 


LD a a 


618041 


Syntax for the FNEND statement: 


TT FNEND i SS 


END DE 
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<letter> is any English alphabet letter from A to Z. <digit> is any decimal digit. Spaces are not 
allowed between FN and <letter>, between <letter> and <digit>, or between <digit> and $. The 
entities FN <letter>, <digit>, and § are referred to as the function name. <parameter> is a simple 
variable. 
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Between the DEF statement and the FNEND statement, any BASIC statement may occur except an- 
other DEF statement or an END statement. These intermediate statements specify what actions the 
function performs. FOR NEXT statements must be entirely contained within the function. Recursive 
function calls are allowed. 


Semantics: 


A user-defined function is referenced by using its name in an expression. The arguments in the function 
reference, if any, are evaluated and their values assigned to the parameters which appear in the func- 
tion definition, that is, parameters are passed by value to functions. After the arguments are passed, 
the expression associated with the function is evaluated and its value is assigned as the value of the 
function. 


A <parameter> is local to the function definition in which it appears; it is distinct from any variable 
with the same name outside the function definition. All other variables in a function definition are 
global to the program unit in which the function occurs. 


A function is executed only when its name is referenced. If a function DEF statement is reached in 
some other fashion, the function is not executed; execution proceeds to the line following the FNEND 
statement. 


A control statement must not transfer control to a line within a multiple-statement function definition 
from outside the definition, or to a line outside a multiple-statement function definition from a line 
within it. 

Examples of multiple-statement function definitions: 


100 DEF FNA(A$) 


110 LET FNA = 1 

120 IF A$ = “YES” THEN 140 
130 LET FNA = 2 

140 FNEND 

100 DEF FNB1$(T) 

110 LET FNBI$ = "YES” 

120 IF T = 1 THEN 140 

130 LET FNBI$ = “NO” 

140 FNEND 


Both of these examples show the use of the LET statement with a multiple-statement function. The 
LET statement is used to assign a value to the function. If no LET statement occurs in a multiple- 
statement function, the value of the function is either zero or the null string depending on the type 
of the function. The assignment statement for multiple-statement functions is fully described in the fol- 
lowing subsection. 


These examples are very similar to one another: the first assigns a numeric value to the function ac- 


cording to the value of a string variable, A$. The second does the converse of the first in that a string 
value is assigned to the function according to the value of a numeric variable. 
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Assignment Statement For Multiple-Statement Functions 


The assignment statement for multiple-statement functions resembles the assignment statement for nu- 
meric and string variables as described in Sections 3 and 4, respectively. However, there is one differ- 
ence: the assignment statement, as used with multiple-statement functions, is used to assign a value 
to a function name rather than to a variable. 


Syntax: 
(ee a <function-name > = <expression > ee 
G18043 


<function-name> must be a multiple-statement function. <expression> is any numeric or string ex- 
pression. The assignment statement for multiple-statement functions must occur within a riultiple-state- 
ment function. 


For examples of the LET statement, refer to the previous subsection entitled Multiple-Statement Func- 
tions. 


CHAIN STATEMENT 


The CHAIN statement allows separate BASIC programs to be run serially without programmer inter- 
vention. 


Syntax: 


CHAIN <program-designator > _ 


< program-designator> is a string expression which specifies the name of the next program to be run. 
<program-designator > must take the following form: 


<program-name > ON <pack-name > ————_| 


<program-name> must conform to the rules for MCP file names as described under Syntax Defini- 
tions in Section 11. <pack-name> is described in the same subsection. 
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Semantics: 


When <program-designator> is evaluated, <program-name> is the name of a BASIC source pro- 
gram residing on disk. The ON option specifies the pack upon which the file resides. If ON is not 
specified, the default pack is assumed. The default pack is the pack associated with the currently log- 
ged-on usercode, or it is the system disk if no usercode is used. 


Upon execution of a CHAIN statement, all files that are open (have an assigned channel number) in 
the currently executing program, are closed (disassociated from the channel number) and must be ex- 
plicitly opened in the following program if they are to be used in that program. Variables in the pro- 
gram designated by <program-name> are independent of variables of the same name in the program 
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containing the CHAIN statement; that is, all variables in <program-name> are initialized to zero or 
to the null string, depending on their type. 


Execution of a CHAIN statement causes termination of the program containing the CHAIN statement. 
The CHAIN statement is not executed if the program containing the CHAIN statement has not been 
saved. Refer to the SAVE command in Section 11. 


Examples of CHAIN statements: 


CHAIN "PROG2" 


CHAIN A$ !Chain to the program whose name 
fis contained in A$. 

CHAIN "BASIC/PROGI ON !B8ASIC/PROGI is on the 

PACKI1” ' pack named PACK]. 
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SECTION 9 
INPUT/OUTPUT 


Input and output facilities provide for the interaction of a BASIC program with collections of data. 
Data may be obtained by a program from statements within the program, from a terminal, or from 
an external file. Output data may be directed to a terminal, a line printer, or an external file. This 
section describes the statements available in Burroughs B 1000 BASIC for input from and output to 
these sources and destinations. The section is divided into three major subsections: Program-internal 
Input, Terminal I/O, and File I/O Statements. 


PROGRAM-INTERNAL INPUT 


Program-internal data is data that is obtained by a program from statements within the program. There 
are three statements associated with program-internal data: the DATA statement, the READ statement, 
and the RESTORE statement. 


DATA Statement 


The DATA statement supplies data to a READ statement. 


<datum> is either a numeric constant, a string constant, or a string constant without the enclosing 
quotation marks. More than one DATA statement may appear in a program. 


Syntax: 


G18046 


Semantics: 


Data from all DATA statements in a program is logically grouped into one data block and is read 
from that block in the sequence in which the DATA statements appear in the program. 


If the execution of a program reaches a line containing a DATA statement, execution proceeds to the 
next line with no other effect. 


The DATA statement is always used in conjunction with the statement. 
Examples of DATA statements: 
DATA 5,12,50,1,8,734 


DATA 3.14159, PI, 5E-30, ”,” 
DATA COMMAS CANNOT OCCUR IN UNQUOTED STRINGS. 
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READ Statement 


The READ statement reads the data from the DATA statement(s). 


<variable> can be any numeric or string variable. 


Syntax: 


G18047 


Semantics: 


Execution of a READ statement causes variables in the READ statement to be assigned values from 
the DATA statements in the program unit. If there are more <variable>s in the READ statement 
than there are data items in the DATA statement, a fatal error occurs. 


The type of a <datum> in the DATA statements must correspond to the type of the variable to which 
it is to be assigned. Numeric variables require as data unquoted strings which are numeric constants, 
and string variables require quoted strings or unquoted strings as data. An unquoted string that is a 
valid numeric constant may be assigned by a READ statement to a string variable or to a numeric 
variable. If an attempt is made to assign a quoted string constant to a numeric variable or to assign 
an unquoted string constant to a numeric variable, a fatal error results. 


Variables in the list of <variable>s for the READ statement are assigned values from left to right. 
Thus, any variables that appear as subscripts in the list of <variable>s are evaluated after values are 
assigned to the variables preceding (to the left of) the subscripted variable. Thus, a variable, I for ex- 
ample, may appear in a READ statement as a simple numeric variable, and then to the right of its 
first appearance, as the subscript for a subscripted variable (for example, READ I,A$(1)). 


If the assignment of a numeric <datum> causes an underflow, the value of the <datum> is replaced 
by the value 0. If an overflow occurs, the <datum> is replaced by the largest machine value. In both 
of these cases the condition is reported to the user and execution continues. If assignment of a string 
<datum> to a string variable results in a string overflow, a fatal error results. 


Examples of READ and DATA statements: 


READ A,B,C 

READ Z$,Y$,X$ 

READ D(A), E1(B), F3(C), I 

DATA 5,0,9,25,”THIS IS A QUOTED STRING.” 

DATA THIS IS AN UNQUOTED STRING.,1E+50,7,JOE SMITH,1 


Execution of these statements has the same effect as the following assignment statements: 


LET A = 5 
LET B = 0 
LET C = 9 
LET Z$ ‘2a 


LET Y$ = “THIS IS A QUOTED STRING.” 


LET X$ "THIS IS AN UNQUOTED STRING.” 
LET D(A) = 1E+50 

LET E1(B) = 7 

LET FSC) = "JOE SMITH" 

LET I = 1 
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RESTORE Statement 


The RESTORE statement allows the data in DATA statements to be reread. 


Syntax: 


RESTORE Ne 


G18048 
Semantics: 


Execution of a RESTORE statement causes subsequent READ statements to take data starting from 
the beginning of the block of data formed from all of the DATA statements in the program. 


Example of READ, DATA, and RESTORE statements: 


READ I,J,K,L 
DATA 1,2,10,100 
RESTORE 
READ M,N,O 


Execution of these statements is equivalent to the following assignment statements: 


@ 
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TERMINAL 1/O 


Terminal input and output statements provide for user interaction with a program by allowing variables 
to be assigned values supplied from a terminal. The various statements used in terminal I/O are de- 
scribed in this section. 


Terminal Input 


There are two statements associated with terminal input: the INPUT statement and the LINPUT state- 
ment. 


INPUT Statement 


The INPUT statement allows the user to supply data from a terminal to variables within a program. 
The syntax for the INPUT statement and for the user's reply follow. 


Syntax for the INPUT statement: 


> 


9-3 


INPUT 


PROMPT <string-expression > : 


G18049 
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Syntax for the INPUT reply: 


$ 


<datum > i. 


<string-expression > is any string expression as described in Section 5. <variable> is any numeric 
or string variable as described in Sections 4 and 5, respectively. The <datum> is either a numeric 
constant, a string constant, or an unquoted string. An unquoted string consists of characters from Ta- 
ble E-1 in the following ordinal positions: 32, 43, 45, 46, 48 through 57, 65 through 90, and 97 through 
122. An unquoted string must be delimited by a comma (,) character if data follows it. 


G18050 


Semantics: 


Execution of an INPUT statement causes program execution to be suspended until a valid reply is sup- 
plied. The user of a program is informed of the need to supply data by the output of a prompt. If 
the PROMPT option is not specified in the INPUT statement, the prompt is a question mark (?) fol- 
lowed by a space. If PROMPT is specified, the prompt is the <string-expression>. A null PROMPT 
("") is allowed. A null PROMPT allows the input of data from a remote terminal in forms mode. 


Each <datum> from the user’s reply must correspond to the type of the variable to which it is to 
be assigned. Numeric constants must correspond to numeric variables, and string constants or string 
constants not enclosed in quotation marks must correspond to string variables. Each <datum> must 
also be within the allowable range of values for that <datum>, and there must be an adequate num- 
ber of data items for the list of <variable>s. No assignment of data is made until the preceding crite- 
ria are met. If these criteria are not met, IBASIC requests that the user resupply the data. 


After this validation process is completed and valid data have been supplied, the variables in the IN- 
PUT statement are assigned values from the INPUT reply in the order in which they occur. 


If an overflow occurs on a <datum>, whether numeric or string, IBASIC requests that the input be 
resupplied. If an underflow occurs on a numeric <datum>, its value is replaced by the value zero; 
execution then continues. 


If neither the INPUT statement nor the corresponding reply contains a final comma (,) character, the 
number of data items in the reply must equal the number of variables in the INPUT statement. 


If an INPUT statement contains a final comma (,) character, the number of data in the INPUT reply 
may exceed the number of variables requiring values. The remaining data in an INPUT reply are re- 
tained to serve as the next requested INPUT reply or LINPUT reply. Any such excess data are dis- 
carded upon execution of a PRINT statement. 


A comma (,) character at the end of an INPUT reply signifies that more data will be supplied. After 
the values contained in the INPUT reply are assigned to variables in the INPUT statement, a prompt 
is reissued. Execution of the program remains suspended until each <variable> in the <variable> 
list has been supplied with a value. 


Subscripts in the list of <variables> are evaluated after values are assigned to the variables preceding 
(to the left of) them in the list. 
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Examples of INPUT statements: 


INPUT X 

INPUT X, A$, Y(2) 

INPUT PROMPT ’What is your name? ”: N$ (30:50) 
INPUT X, Y, 

INPUT PROMPT ””: C(3) 


Examples of corresponding INPUT replies: 


2 

25 "ABOVE” 0.2 
JOHN DOE 
1,2,3,4,5,6 

7000 


LINE INPUT (LINPUT) Statement 

The LINE INPUT statement, referred to as LINPUT throughout the rest of this manual, enables an 
entire line of input, including embedded spaces, commas, and quotation marks, to be assigned as the 
value of a string variable. The syntax and semantics of the LINPUT statement and for the reply to 
the LINPUT statement follow. 


Syntax for the LINPUT statement: 


See aa i PROMPT <cstring-expression > : =" <string-variable > | 
LINE INPUT 


G18051 


Syntax for the LINPUT reply: 


254 


<character > 


G18052 


<string-expression> is any string expression as described under String Expressions in Section 5S. 
<string-variable> is any string variable as described under String Variables in Section 5. <character> 
is any character. 


Semantics: 


Execution of a LINPUT statement causes program execution to be suspended until a valid reply is sup- 
plied. The user of a program is informed of the need to supply data by the output of a prompt. If 
the PROMPT option is not specified in the LINPUT statement, the prompt is a question mark (?) 
character followed by a space. If PROMPT is specified, the prompt is a <string-expression>. A null 
PROMPT (””) is allowed. A null PROMPT allows the input of data from a remote terminal in forms 
mode. After the LINPUT reply is supplied, the string of <character>s is assigned to the <string- 
variable>. 
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Examples of LINPUT statements: 
LINPUT A$ 
LINPUT Z§(50:75) 
LINPUT PROMPT “””: A$, BS$ !Prompt is the null string 


Examples of LINPUT replies: 
NOW IS THE TIME FOR ALL GOOD MEN TO COME TO THE AID OF THEIR PARTY. 
"HS M&'(=-\ __.,?7/< > 4+5:*@ 
Any valid character, including commas, may occur in a LINPUT reply. 
THIS IS A LINPUT REPLY. 
Terminal Output 


There are four statements associated with terminal output: the PRINT statement, the PRINT USING 
and IMAGE statements, and the MARGIN statement. 


PRINT Statement 
The PRINT statement is used to generate output on a terminal. 


Syntax: 


* 
3 


<expression > T 


PRINT 
TAB ( <index > ) 


G18053 


<expression> is any numeric or string expression. <index> is a numeric expression which, when 
evaluated, is the columnar position on the terminal where the next <expression> is to be displayed. 
Columnar position is the number of print positions from the leftmost print position. 


Semantics: 


The execution of a PRINT statement generates a string of characters for transmission to a terminal. 
This string of characters is determined by the successive evaluation of each item in the PRINT state- 
ment as well as the type of separator used to delimit the items. Refer to Print Separators and TABs 
in this section. 


Examples of PRINT statements: 


PRINT X 

PRINT X, Y 

PRINT X, Y, Z, 

PRINT ,,,X 

PRINT 

PRINT "X EQUALS", 10 

PRINT X; (Y*Z)/2 

PRINT TAB(10); A$; “IS DONE.” 


9-6 


B 1000 Systems Interactive BASIC (IBASIC) Language Manual 
Input/Output 


The rules used for displaying the items in the PRINT statement are described in the four subsections 
that follow. 


Printing Numeric Values 


Numeric expressions in a PRINT statement produce a string of characters consisting of a leading space 
if the number is positive, or a leading minus sign if the number is negative. This leading space or minus 
sign is followed by the decimal representation of the absolute value of the number. This sequence of 
characters is terminated by a trailing space. The possible decimal representations of a number are the 
same as those described for numeric constants in Section 4 and are used as follows: 


1. A numeric value that is an integer in the range — 16777215 to + 16777215 is written as an inte- 
ger, that is, a series of decimal digits without a decimal point or an exponent. 

2. A numeric value that cannot be represented precisely as an integer is written as a real number, 
that is, a series of decimal digits with a decimal point. A real value that can be represented 
with six or less digits without losing accuracy is written without an exponent. 

3. If accuracy would be lost by using only six digits, the value is displayed as a normalized decimal 
number with the necessary significant digits and with an exponent. For example, 10**(—6) is 
written as .000001 and 10**(—7) is written as 1.E-7. Exponents have a maximum of two 
decimal digits. 


The maximum widths for each format follow. 


Format Maximum width 


Integer !10 places: sign, 8 digits, 
! trailing space 


Real, no 19 places: sign, 6 digits, 
exponent 1 decimal point, 
! trailing space 


Real, exponent !13 places: sign, 6 digits, 
! decimal point, 
! E, sign of exponent, 
! 2-digit exponent, trailing 
! space 


Examples of numeric output: 


1 

5000 
3.1415 
6.283E + 25 
0 

1.E-7 


Printing String Values 


String expressions are evaluated to generate the corresponding string of characters. 
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Print Separators and Tabs 


A print separator is either a comma (,) or a semicolon (;) and is used to separate items in a PRINT 
or OUTPUT statement. These separators are shown in the syntax for the PRINT and OUTPUT state- 
ments in this section. TAB is also shown in the syntax for the PRINT and OUTPUT statements. The 
function of print separators and TABs is to specify what type of spacing is to be used between print 
items as they are displayed. A print item is an expression or TAB call occurring in a PRINT or OUT- 
PUT statement. 


The evaluation of the semicolon separator generates the null string within the output. A null string 
is a string of zero length. 


Example: 


LET A, B = 4 
PRINT "A+B="; A+B; "“A*B="; 16 


Execution of this example causes the following to be displayed. 
A+B= 8 A*B= 16 


The output from the evaluation of a comma separator or a TAB depends upon the string of characters 
already generated by the current or previous PRINT statements. 


The use of the comma separator causes the columnar position to be advanced to the end of a prede- 
fined print zone. A print zone has a width of 15 print positions. In an 80-character print line there 
are five full-width print zones and one S-character partial print zone. The length of the print line and, 
thus, the number of print zones may be changed by the MARGIN statement. For more information, 
refer to the description of the MARGIN statement in this section. 


The evaluation of the comma print separator depends upon the current columnar position. One of three 
actions may be taken depending on this position. First, if the columnar position is neither in the last 
print zone on a line nor beyond the margin, one or more spaces are generated to set the columnar 
position to the beginning of the next print zone on the line. 


Example: 
LET A,B=4 
PRINT UAtB="', AB, "AXBS", 16 
PRINT '!----*«----] wn nn hn Do nw Ke ee ek ek 5! 


Execution of the above example causes the following to be displayed. 


Second, if the current columnar position is in the last print zone on a line, an end-of-line character 
is generated by IBASIC and subsequent displaying continues on the next line. An end-of-line is a NUL, 
CR, LF, or ETX character, or the end of the record. 
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Example: 
MARGIN 50 ' The MARGIN statement is described in Section 9. 
PRINT 1,2,3,4,5,6,7 
PRINT Wenn ke enn | een eke 2-- ok - 3 ek 5! 


Execution of this example gives the following output: 


Third, if the current columnar position is beyond the margin, as it would be if evaluation of the last 
print item exactly filled the line, an end-of-line character is generated and subsequent displaying begins 
in the first print zone on the new line. 


Example: 
MARGIN 50 
PRINT 1,2,3,''FOUR'',5,0,7 
PRINT Wow wa | ----k-- -- 2 -- = k-- - - 3 -- - ke - - - - kt 


The TAB call sets the columnar position of the current line to the specified value. The current line 
is the string of characters generated by PRINT and OUTPUT statements since the last end-of-line char- 
acter was generated. The syntax for the TAB call is shown in the PRINT statement syntax and also 
in the OUTPUT statement syntax. 


When TAB is used in a PRINT statement, <index> is evaluated and rounded to an integer, n. If 
n is less than 1, an error message is displayed, n is replaced by 1, and execution continues. If n is 
greater than margin m, n is reduced by an integral multiple of m so that it is within the range 1 < = 
n <= m; that is, n is set equal ton — m * INT((n—1)/m). 


If the current columnar position of the current line is less than or equal to n, spaces are generated, 
if necessary, to set the columnar position to n. If the current columnar position of the current line 
is greater than n, an end-of-line character is generated followed by n—1 spaces to set the columnar 
position of the new current line to n. 


If the value of a TAB expression is so large that significance is lost, a nonfatal error occurs. A nonfatal 
error is an error which causes an error message to be printed and allows execution to continue. 


Example: 
MARGIN 50 
PRINT A; TAB(20); -1; TAB(40); B; TAB(65); C 
PRINT a eC 
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Execution of this example gives the following output: 


End-of-Line Conditions 


Under certain conditions an end-of-line character is generated by IBASIC before subsequent action to 
a print line. These conditions are described next. 


Whenever the columnar position is greater than the integer | and the evaluation of the next print item 
would cause that position to exceed the margin by more than one position, an end-of-line character 
is generated prior to the characters generated by that print item. 


During the evaluation of a print item whose length is greater than the margin length, if the generation 
of a character would cause the columnar position to exceed the margin by more than one position, 
an end-of-line character is generated before that character is displayed, resetting the columnar position 
to 1 on the following line. 


An end-of-line character is generated when evaluation of a list of print items is completed, if that list 
does not end with a print separator. Otherwise, the rules for the print separator prevail. 


Formatted Output 


The PRINT USING statement is used to control the format of output by specifying an image to which 
that output must conform. The following two subsections describe the PRINT USING statement and 
the images used with it. 


PRINT USING Statement 
The PRINT USING statement uses a user-created image to format the print items on the print line. 


Syntax: 


expression > 


PRINT USING <image > 


G18054 


<image> is either a string expression or a line number which references a separate IMAGE statement. 
<expression> is either a numeric or a string expression. The items following the colon (:) are referred 
to as the output list. 


Semantics: 


The execution of a PRINT USING statement generates a string of characters for transmission to a 
terminal. This string, which is generated from the list of <expression>s, is formatted according to 
the <image>. Possible values for the <image> are described next under Images. 
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Examples of PRINT USING statements: 


PRINT USING 100: A, B Image is located at line 100. 


PRINT USING A$: D, E, F; Image is located in string A$. 


Images 


Images are used in conjunction with PRINT USING statements. An <image> is either a line number 
which refers to an IMAGE statement containing a format string, or a string expression whose value 
is the format string. The syntax for a string expression used as an image is the same as for string ex- 
pressions as described in Section 5. The syntax for a line number used as an image is the same as 
for line numbers as described under Statement Lines in Section 3. The syntax for the IMAGE statement 
follows. The value for a string expression used as an image is also contained in the following syntax 
diagram, except that the word IMAGE and the colon (:) are excluded from the string expression. 


Syntax: 


<justifier > <i-format > <literal-string > 
<f-format > 


<e-format> 


IMAGE > <literal-string > 


G18055 


<literal-string> is made up of any sequence of characters that may be used in a string constant except 
the following: 


Character Name 
> Greater than 
< Less than 
# Number sign 
+ Plus sign 
_ Minus sign 
Period 
A Circumflex accent 


" Quotation mark 


Even though these characters cannot be used in a <literal-string>, the same effect may be obtained 
by putting them in quoted strings in the output list. 


<justifier > is either a greater than (>) or a less than (<) character. <sign> is a plus (+) or a minus 
(-) character. 


The format items, <i-format>, <f-format>, and <e-format>, are described in detail under Format- 
ted Numeric Output in this section. All of the items following the colon in an image, which may in- 
clude several format items and <literal-string>s, are referred to as the format string. Any spaces fol- 
lowing the colon are part of the format string. 
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Semantics: 


When the execution of a program encounters a line containing an IMAGE statement, execution pro- 
ceeds to the next line with no other effect. 


When a PRINT USING statement is executed, the associated format string is scanned. Any <literal- 
string >s are displayed exactly as they occur in the format string. Any format items generate an output 
field whose length equals the number of characters in the format item (including the <justifier>, 
<sign>, number sign (#), period (.), and <circumflex-accent>s). The contents of the output field 
depend upon the corresponding <expression> in the PRINT USING statement. <expression>s are 
displayed in the sequence in which they occur, according to the format item currently being scanned. 


The <expression>s are displayed in the manner described in the following three main subsections: 
Formatted Numeric Output, Formatted String Output, and End-of-Line Conditions. 


If a PRINT USING statement contains an output list, but there is no format item in the associated 
format string, a fatal error occurs. 


If the output from an <expression> in a PRINT USING statement is longer than its corresponding 
format item, the current line is terminated by an end-of-line character, the evaluated <expression> 
is displayed unformatted, and displaying continues according to the format. Refer to the second of 
the following five examples. 
Examples of PRINT USING and IMAGE statements: 

Assume X has the value 342 and Y has the value 42.021. 


30 PRINT USING 40: X, Y 
40 IMAGE:RATE OF LOSS #### EQUALS ####.4#4# POUNDS 


The output is the following: 

RATE OF LOSS 342 EQUALS 42.02 POUNDS 
Example of format item overflow: 

5 PRINT USING "OVERFLOW FORMAT ITEM #4STARTS NEW LINE":34564 
The output is the following: 


OVERFLOW FORMAT ITEM 
34564 STARTS NEW LINE 


Assume A, B, and C have the value 1. 


10 LET A$ = "<##### #### HHH HHHH HAHA AANA” 
20 PRINT USING A$: A, B, C 


The output is the following: 


l 1.0000 1000. 0090E-03 


9-12 


B 1000 Systems Interactive BASIC (IBASIC) Language Manual 
Input/Output 


Use of the left justifier. 


60 PRINT USING 70: “ONE”, “TWO” 
70 :Z<#HHH < HAHAZ 


These two statements give the following output: 


ZONE TWO Z 


Use of both justifiers. 


110 IMAGE :> —##< —## 
120 PRINT USING 110: —2, —2 


These two statements give the following output 
(the quotation marks are not displayed): 


V1 ~?-2? in 
Formatted Numeric Output 


There are three steps in displaying formatted numbers: generating the value, generating the sign, and 
justifying the value. 


The value is generated first. Numeric values are generated by being rounded and represented according 
to the format used. The three possible formats are the i-format, the f-format, and the e-format. 


i-format 


The i-format consists of a series of contiguous number signs (#). For the i-format, the corresponding 
value is rounded to the nearest integer and is represented using implicit-point, unscaled notation, with 


no superfluous leading zeros. Implicit-point notation means that the decimal point is not present. Un- 
scaled notation means that there is no exponent part. 


Syntax: 
ee eT 
G18056 


Example of an i-format: 


HHH 


f-format 


The f-format consists of a series of contiguous number signs (#) and an explicit decimal point (.). The 
decimal point can occur at any point within, before, or after the string of number signs. For the f- 
format, the corresponding value is represented by explicit-point unscaled notation. Moreover, the repre- 
sentation is rounded or extended according to the number of number signs (#) following the decimal 
point in the format item. Zeros are not generated to the left of the decimal point unless the number 
is less than 1 and there is at least one number sign (#) to the left of the decimal point in the format 
item. In that case, a zero is generated immediately before the decimal point. 
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Syntax: 


G18057 


Examples of f-formats: 


HHE. 
HH HH 
HHAHE 


e-format 


The e-format consists of the i-format or the f-format followed by three or more circumflex accents 
(A). For the e-format, the corresponding value is represented by explicit- or implicit-point scaled nota- 
tion, with as many digits to the left of the decimal point or within the integer as there are number 
signs (#) to the left of the decimal point in the format item. The representation is rounded or extended 
according to the number of number signs following the decimal point in the format item. A value of 
zero generates a single zero in the integer to the left of the decimal point. The number of <circumflex- 
accent >s in an e-format determines the number of characters in the exponent. The first of these char- 
acters is the letter E, the next is a mandatory sign, and the remaining characters represent the value 
of the exponent, with leading zeros added to ensure that the exponent has the proper length. If the 
exponent is zero, the mandatory sign is positive; the exponent of zero is zero. 


Syntax: 


ge 


<circumflex-accent > 
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Examples of e-formats: 


HHEAAA 
HHHAAAAAA 
#.AAA 
HLHHHHHHAAAA 
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The second step in displaying a formatted number is generating the sign. A leading sign or space is 
always generated with each number to be displayed according to the following rules. 


1. If the rounded value of a number is negative, a minus sign (-) is generated regardless of the 
sign in the format item. 

2. If the rounded value is nonnegative and the format item contains a plus sign (+), a plus sign 
is generated. 

3. If the rounded value is nonnegative and the format item contains a minus sign, a space is gener- 
ated. 

4. If the rounded value is nonnegative and the format item contains no sign, no leading space 
or sign is generated. 


The third step taken by IBASIC before displaying a numeric value is to justify the value (extend it 
with spaces), if necessary, so that its length equals that of the format item. Spaces are added on the 
left, unless a format item begins with a less than sign (<), in which case the spaces are added on 
the right. 


Formatted String Output 


A string value may be written using any type of format item. The string is extended by spaces so that 
its length equals that of the format item. These spaces are added on the left for right justification if 
the format item begins with a greater than sign (>). They are added on the right for left justification 
if the format item begins with a less than sign. Otherwise, they are added equally on either side for 
centering. If the number of spaces required in the last case is odd, the extra space is added on the 
right. 


If the string value is longer than its corresponding format item, the current print line is terminated 
by an end-of-line character, the string value is displayed unformatted, and displaying continues accord- 
ing to the format. 


Examples of formatted string output: 


PRINT USING ''<####H HHH AHHHA PAAR AA RAHA A LITERAL STRING'':"'THIS IS A! 
PRINT USING '#####HRR RAPHE HRARA RAHA AAA LITERAL STRING':''THIS IS A! 
PRINT USING '>####HHRHRA ARR RRA RRA R AH AAA LITERAL STRING'':"THIS 1S Al 


Execution of these examples gives the following output: 


THIS IS A LITERAL STRING 
THIS IS A LITERAL STRING 
THIS 1S A LITERAL STRING 


End-of-Line Conditions 


The characters generated by each <literal-string> and each value under the control of a format item 
are transmitted in the same manner as described under Terminal Output in this section. In particular, 
if the generation of characters for any <literal-string> or value would cause the columnar position 
of a nonempty line to exceed the margin by more than one, an end-of-line character is generated before 
the characters of the <literal-string> or value. Furthermore, an end-of-line character is generated each 
time the columnar position of the current line exceeds a nonzero margin. 
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Example: 
MARGIN 50 
PRINT 1,2,3,''OVERLAP!! 
PRINT !!----? Keene ]----%----2----%---- 3--- ke k= 5! 
PRN tae ye toe B 7510 
PRINT '!----*---- Jeroo*e--- Q--- nk -- B ee nko - en nk 5"! 


Execution of this example gives the following output: 


l 2 3 
OVERLAP 
----k---- |] ----*k---- Qe-n- nko Bere ek ---- h----: eee 
l 2 3 4 
3 6 7 8 
>) 10 
mma heen Poe nk 2 nn he a Bo a ke ek -- -- 55 


If the number of values to be written exceeds the number of format items in the format string, an 
end-of-line character is generated and the format string is reused for the remaining expressions. If for- 
mat items remain in the format string after all values have been written, any succeeding <literal- 
string > is written, and generation of characters is terminated beginning at the first unused format item. 


Example: 


AS = "### ### END OF FORMAT ITEMS'! 
PRINT USING A$:1,-1,2,-2,3,-3,4,-4,5 


Execution of this example gives the following output: 


-] END OF FORMAT ITEMS 
-2 END OF FORMAT ITEMS 
-3 END OF FORMAT ITEMS 
-4 END OF FORMAT ITEMS 


Wm Fwn — 


Finally, an end-of-line character is generated after all other character generation is completed, unless 
the output list ends with a semicolon, in which case no end-of-line character is generated. 


MARGIN Statement 


The MARGIN statement provides programmatic control over the length of lines produced by the 
PRINT or PRINT USING statement. 


Syntax: 


MARGIN <margin-value > ee 


<margin-value> is a numeric expression. 
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Semantics: 


The MARGIN statement resets the maximum number of bytes that the PRINT and PRINT USING 
statements can generate in a print line. When <margin-value> is evaluated, it is rounded to the near- 
est integer and then assigned as the new margin. The new margin takes effect immediately; thus, if 
a partial line is awaiting completion, the new margin is used when a subsequent PRINT or PRINT 
USING statement is executed. 


A margin setting of 0 restores the margin to the default value for the terminal to which the user is 
attached. 


Examples of MARGIN statements: 


MARGIN 20 

PRINT ''MARGIN LENGTH - 20"! 

PRINT ''THIS SENTENCE GOES BEYOND THE MARGIN.'' 
PRINT "THIS STAYS WITHIN." 


MARGIN 50 
PRINT ''NOW THE MARGIN Aas 50% 
PRINT Se ee Q-n nn ke - 3 ---- kk 5 


Execution of these examples gives the following output: 


MARGIN LENGTH - 20 

THIS SENTENCE GOES B 

EYOND THE MARGIN. 

THIS STAYS WITHIN. 

NOW Hae MARGIN IS 50. 

oe we me oe [ann ee 2 ee ek - 35 +k - ek - 5 


ARRAY 1/O 


Array I/O statements enable entire arrays to be read or written. 


Array Input 


Two statements that enable an entire array to be input are the MAT READ statement and the MAT 
INPUT statement. The MAT READ statement enables an array to be initialized from internal data. 
The MAT INPUT statement enables an array to be input from a terminal. These two statements are 
described in the following paragraphs. 
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MAT READ Statement 


Execution of a MAT READ statement causes arrays to be assigned values from the data sequence cre- 
ated by DATA statements. 


Syntax: 


MAT READ i aera > ( <subscript > TL * <subscript > Ty ) 


G18060 


<array-name> follows the same naming conventions as simple variables. <subscript> is a numeric 
expression. This numeric expression must evaluate to a number which is greater than or equal to the 
lower-dimension bound for arrays in the program. 


Semantics: 


If one or both of the <subscript>s are present, the array is redimensioned before values are assigned 
to it. Arrays are redimensioned in the manner described for the MAT Assignment Statement in Section 
6. <subscript>s are evaluated after values are assigned to the arrays preceding (to the left of) them 
in the array list. 


Elements in an array are assigned values from the DATA statements in a row-by-row fashion. Refer 
to DATA Statement in this section for more information on DATA statements. The example in this 
subsection shows row-by-row assignment. 


The type of each datum in the data sequence must correspond to the type of the array element to 
which it is to be assigned. Numeric variables require numeric constants as data and string variables 
require quoted strings or unquoted strings as data. An unquoted string which is a valid numeric repre- 
sentation may be assigned to a string variable or to a numeric variable by a MAT READ statement. 
If data types do not match, a fatal error occurs. 


If the array list requires more data than are present in the remainder of the data sequence, a fatal 
error occurs. 


Example of the use of a MAT READ statement: 


OPTION BASE 1 
DIM A(10,10) 

DATA 1,2,3,4,5,6, 7,8,9,10,11,12 
MAT READ AQ3,4) 

MAT PRINT A; 


Execution of this example gives the following output: 


1 2 3 4 
5 6 Z 8 
9 10 11 12 
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MAT INPUT Statement 


The MAT INPUT statement permits entire arrays to be input from the terminal. The syntax and se- 
mantics of the MAT INPUT statement follow. 


Syntax: 


—— MAT INPUT se Rabid < string-expression> : _yT~ 


> 


caida SACiai 


< array-name> (?) 


< array-name> 


<string-expression> is any string expression as described under String Expressions in Section 5. 


<array-name> follows the same naming conventions as used for simple variables. <subscript> is a 
numeric expression. This numeric expression must evaluate to a number which is greater than or equal 
to the lower-dimension bound for arrays in the program. <array-name> (?) specifies a variable-length 
vector. 


Semantics: 


Execution of a MAT INPUT statement suspends the program until a valid input reply, as specified 
in subsequent paragraphs, has been supplied. After a valid input reply is received, the MAT INPUT 
statement causes all arrays in the statement except variable-length vectors to be assigned values from 
the input reply, in the order in which they appear in the statement. Values are assigned to all elements 
in each array row by row. 


The program user receives a prompt when data is required for a MAT INPUT statement. If the 
PROMPT option is not specified in the MAT INPUT statement, the prompt is a question mark (?) 
character followed by a space. If PROMPT is specified, the prompt is the <string-expression>. 


If one or both of the <subscript>s are present, the array is redimensioned before values are assigned 
to it, but after values are assigned to the arrays preceding it in the array list. Arrays are redimensioned 
in the manner described for the MAT Assignment Statement in Section 6. 


The type of each data element in the input reply must correspond to the type of the array element 
to which it is to be assigned. 


The entire response to a request for array input does not have to be supplied with a single input reply. 
If an input reply contains a final comma (,) character, then a further input reply is requested to obtain 
more data. 


If the evaluation of a numeric data element causes an underflow, the value of the element is replaced 
by zero. 


If <array-name> (?), a variable-length vector, appears in the MAT INPUT statement, then as many 
data as are present in the input reply (or sequence of input replies up to and including the first which 
does not end with a comma (,) character) are supplied as input for that vector. The vector is then 
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redimensioned dynamically by setting the upper bound of the vector equal to the subscript of the 
element receiving the last data element. 


With variable-length vectors, the value of the function NUM is the number of data supplied to the 
last array that receives data by means of a MAT INPUT statement. 


Example of the use of MAT INPUT statements: 


OPTION BASE 1 

DIM A$(4),B(3,4) 

MAT INPUT PROMPT "ENTER 4 GRADES”: A$ 
MAT INPUT B(@3,3),C(?) 

MAT PRINT A$;B;C; 


Assume the following input is entered from a remote terminal: 


C,B,A,B 
1,2,3,4,5,6,7,8,9 
-1,-2,-3,-4 


Execution of this example results in the following output: 


CBAB 
1 2 3 
4 5 6 
7 8 9 


Sy -23). 3 24 
Array Output 


One statement is provided to enable entire arrays to be written to the terminal. This statement is the 
MAT PRINT statement. 


MAT PRINT Statement 


The MAT PRINT statement displays an entire array on the terminal in row order. 


MAT PRINT £ <array-name > ———— 


Syntax: 


G18061 


<array-name> follows the same naming conventions as simple variables. 
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Semantics: 


Execution of a MAT PRINT statement causes the values of all elements in all arrays in the list of 
<array-name>s to be displayed on the terminal. The characters generated for transmission to the ter- 
minal by the displaying of one array in the list of <array-name>s are those that would be generated 
if the individual elements in an array had been listed, row by row, in the list of <expression>s of 
a PRINT statement. Each array element displayed with a MAT PRINT statement is separated from 
the following element by spaces according to the separator (comma or semicolon) that follows the <ar- 
ray-name> in the list of <array-name>s, or by a comma separator if the last separator is not 
specified. 


An end-of-line character is generated prior to any characters generated by a MAT PRINT statement 
if the current line of output is nonempty. An end-of-line character is also generated between the output 
for successive arrays in the list of <array-name>s. 


Example of the use of the MAT PRINT statement: 


OPTION BASE 1 

MAT READ AS(3,3) 

MAT PRINT AS; AS, 

DATA ONE, ''2'', THREE, ''4!', FIVE, ''6!', SEVEN, 8!) NINE 
PRINT Monee ne | nnn he na 2 Kh Be ke ek 


Execution of this example produces the following output: 


ONE2ZTHREE 

LFIVE6 

SEVEN8NINE 

ONE Z THREE 
4 FIVE 6 


Example of MAT PRINT with different separators: 


OPTION BASE 1 
MAT READ A (4,4) 


MAT PRINT A 
PRINT ee ee et ee te er er 
MAT PRINT A, 
PRINT Mmmm tem ne | ene ne a2 em en ke nw Jee kee --  k- - --5!! 
MAT PRINT A; 


DATA 11,12,13,14,21,22,23,24,31,32,33,34,41,42, 43,44 
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Execution of this example causes the following to be displayed. 


12 13 14 
2 22 23 24 
31 32 33 34 
mn 42 43 Lh 
wo--k---- | nnn oko - 2-2-2 2 ke -- 3 --- ik -- -- 4 -- eke 5 
1] 12 13 14 
21 22 23 24 
31 a2 33 34 
4 | 42 43 Lh 
ee ee | -- 79% ----2----%--- - 3-~-- Kk - --- k= 5 
1} 12 #13 «214 
21 22 23 24 
31 32 33 34 


FILE 1/O STATEMENTS 


An external file is a collection of data stored on disk. BASIC has the capability of manipulating exter- 
nal files. The statements and concepts necessary to use external files are described in this subsection. 


File Access 


The OPEN and CLOSE statements are provided to enable access to external files. A particular BASIC 
environment may access, for input only, any external disk file maintained by MCPII which may be 
accessed under the currently logged on usercode. A particular BASIC environment may create or 
change only files which have a family name of the currently logged on usercode. Thus, the rules for 
accessing a file for input only are more flexible than those for files which are to be created or changed. 
If usercodes are not used, the scope of access of the BASIC environment is limited to public files. 


OPEN Statement 


The OPEN statement makes an external file accessible to a program by establishing the connection be- 
tween the physical file (on disk) and the channel number within the program. 
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Syntax: 


OPEN # <channel-number > : <file-name > , INPUT 
OUTPUT 
OUTIN 
SEQUENTIAL 
DISPLAY 
INTERNAL 


BEGIN 
END sl 


VARIABLE <index > 


G18062 


<channel-number> is a numeric expression which must evaluate to an integer in the range 0 to 255. 
<index> is a numeric expression which gives the maximum allowable length for a record of a file. 
<file-name> is a string expression which, when evaluated, is the name of a disk file. The value of 
<file-name> can take the following form. 


Syntax for <file-name>: 


—— < MCP-file-name> ON < pack-name> 


Examples of values for <file-name> follow. 


"FILE1" 

"FILE] ON PACKB” 
“(IBASIC)/DATA ON PACKA” 
“"MULTIID/FILEID ON MYPACK” 


Semantics: 


Through use of the OPEN statement, disk files can be assigned to a channel, and can then be accessed 
in a program by referencing the assigned channel. If the file being accessed already exists, that file 
is assigned to the channel. If the file does not exist, a new file is created and assigned to the channel. 
A maximum of 16 files can be opened at one time in a BASIC program. 


At the beginning of program execution, all channels except channel zero are inactive, that is, no file 
is assigned to them. Channel zero is always open during the execution of a program. The file associated 
with channel zero is the terminal from which IBASIC is executed. This file is the source of data for 
INPUT statements and the destination of output from PRINT statements. The appearance of channel 
zero in an OPEN statement is ignored. The appearance of a nonzero channel in an OPEN statement 
that is already active causes a fatal error. 
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The keywords that can be listed after the <file-name> are called the file attributes. File attributes 
specify logical characteristics of a file and the manner in which a file is to be accessed by a program. 
If the file to be opened does not match the file attributes, the file is not opened and a fatal error 
occurs. The file attributes that can be specified are access mode, file organization, file type, file pointer 
position, and record type. 


The access mode specifies the manner in which data in the file are accessed. The possible modes of 
access are INPUT, OUTPUT, and OUTIN, as can be seen from the syntax diagram. If INPUT is 
specified, it is only possible to read from the file. If OUTPUT is specified, it is only possible to write 
to the file. If OUTIN is specified, it is possible to read from and to write to the file. If no access 
mode is specified, the file is opened OUTIN. 


The access mode of the terminal, channel zero, is OUTIN. 


File organization is the logical organization of records within a file. Currently, there is only one 
organization possible: SEQUENTIAL. A sequential file is a linearly ordered sequence of records, acces- 
sible in sequential order. If no file organization is specified, the file organization is SEQUENTIAL. 


The file organization of the terminal, channel zero, is SEQUENTIAL. 


File type specifies the format of data in a record of a file. Two types are available: DISPLAY format 
and INTERNAL format. In a DISPLAY format file, each record is a string of characters. The only 
file organization provided for DISPLAY format files is SEQUENTIAL. In an INTERNAL format file, 
each record contains a sequence of numeric or string values. An end-of-record delimiter (NUL or 
physical end of the record) separates records in the INTERNAL format file, but is not part of the 
record. If no file type is specified, the type of the file is DISPLAY format. 


The file type of the terminal, channel zero, is DISPLAY format. 


A file pointer position specifies the initial position of the file pointer when the file is opened. This 
pointer indicates the position in the file that is affected by the next file input or output statement. 
The possible choices for the file pointer are BEGIN or END. If the pointer position is END, the point- 
er is positioned at the end of the file, the position immediately following the last record of the file. 
If the pointer position is BEGIN, the pointer is positioned at the beginning of the first record of the 
file, which is also the end of the file if it contains no records. 


If the pointer position is not specified, the position is assumed to be the beginning of the file if the 
access mode is INPUT or the end of the file if the access mode is either OUTPUT or OUTIN. 


A record type specifies the type and maximum length of records in a file. Currently, the only record 
type available is VARIABLE. A VARIABLE type record contains records whose lengths may be any 
value between 0 and <index>. The length of a record in a DISPLAY format file is the number of 
characters in that record. The length of a record in an INTERNAL format file is either (1) <index> 
* 5 bytes if <index> is specified following the VARIABLE attribute, (2) the size of the records in 
an existing file, or (3) 180 bytes if the file does not already exist and no <index> is specified following 
the VARIABLE attribute. The length of each numeric item in the record is five bytes. The length of 
each string in the record is the number of characters in the string plus 1. 


If no record type is specified, the type of records in the file is VARIABLE. The maximum length of 
the records in the file is either 180 bytes or the record size of the file if it already exists before execu- 
tion of the corresponding OPEN statement. 


The record type for the terminal, channel zero, is VARIABLE with a record length corresponding to 
a default value defined by the type of terminal attached. For example, for a TD830 the record length 
is 80. 
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NOTE 
A record is variable only to IBASIC. A file actually appears as a fixed record 
length file on the B 1000 system. Also, the end-of-record delimiter generated 
by IBASIC is not recognized as such by the B 1000 system, so that old data 
in a record after the end-of-record delimiter are invisible to IBASIC but 
visible to the B 1000 system. 


Examples of OPEN statements: 

OPEN #1: "MYFILE” 

OPEN #1: "MYFILE”, BEGIN 

OPEN #2: "RESULT’”, OUTPUT, VARIABLE 132 

OPEN #N: A$, SEQUENTIAL, DISPLAY, OUTIN, BEGIN 
CLOSE Statement 
The CLOSE statement closes the file assigned to the specified channel. 


Syntax: 


CLOSE # <channel-number > A ili 
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<channel-number > has the same syntax as the <channel-number> in an OPEN statement: a numeric 
expression that must evaluate to an integer in the range 0 to 255. 


Semantics: 


Execution of a CLOSE statement closes the file assigned to the specified channel, causing the channel 
to become inactive. All files still assigned to channels when execution of a program terminates are 
closed. It is possible to close a file and then reopen it in the same program. 


If an inactive nonzero channel appears in a CLOSE statement, a fatal error occurs. 
Examples of CLOSE statements: 


CLOSE #3 
CLOSE #N 


File 1/O Statements 


IBASIC provides for input from and output to disk files, and for end-of-file testing on these files 
through the use of file input and output statements. The statements necessary for the capabilities previ- 
ously mentioned are described in this section under the headings File Input, File Output, and Exception 
Statement. 


File Input 


File input statements enable the user to obtain input from files. Three statements provide this 
capability: 1) the file INPUT statement, 2) the file LINPUT statement, and 3) the file MAT INPUT 
statement. 
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File INPUT Statement 
The file INPUT statement allows data to be transferred from a disk file to variables within a program. 


Syntax: 


INPUT # <channel-number > : ae 
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<channel-number> is a numeric expression which must evaluate to an integer in the range 0 to 255, 
and specifies the channel through which data transfer takes place. <variable> is any numeric or string 
variable as described in Sections 4 and 5, respectively. The list of <variable>s specifies the variables 
within the program that are to receive data. 


Semantics: 


If channel zero is specified in a file INPUT statement, the statement is executed as if no <channel- 
number > were specified; it performs the same function as the INPUT statement for terminal I/O. If 
a nonzero <channel-number> is specified, execution is similar to the INPUT statement for terminal 
I/O, except that no prompt is transmitted and no error occurs if all values are not supplied in a single 
record of the file. If an inactive channel is specified, a fatal error occurs. 


Each time a value is required from a file, the datum which begins at the current position of the file's 
pointer is used to supply that value. The type of this datum must correspond to the type of the variable 
to which it is to be assigned. Overflow and underflow are handled in the same manner as for assign- 
ment statements. After the value has been supplied, the file pointer is advanced to the beginning of 
the next datum in the record, if more data follow; otherwise, the pointer is advanced to the beginning 
of the next record. If there is insufficient data in a file to satisfy an INPUT request, a fatal error 
occurs. 


If the file pointer is not at the beginning of a record following execution of a file INPUT statement 
which does not end with a final comma, the pointer is advanced to the beginning of the next record 
in the file. If the statement does end with a comma, the file pointer remains where it was until subse- 
quent I/O operations take place. A pointer positioned in the middle of a record is advanced to the 
beginning of the next record if an output statement is executed on that file. 


Examples of file INPUT statements: 


INPUT #1: X 
INPUT #N: X, A$, Y(2) 
INPUT #N+1: X,Y, 


File LINPUT Statement 
The file LINPUT statement enables an entire record, including embedded spaces, commas, and quota- 


tion marks to be assigned as the value of a string variable. The syntax for the LINPUT statement fol- 
lows. 
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Syntax: 


LINPUT # <Cchannel-number > : <string-variable > —— ee — 
G18065 


<channel-number> is a numeric expression which must evaluate to an integer in the range 0 to 255, 
and specifies the channel through which data transfer takes place. <string-variable> is any string 
variable as described in Section 5. <string-variable> receives the data as a result of execution of the 
LINPUT statement. 


Semantics: 


If channel zero is specified in a file LINPUT statement, the statement is executed as if no <channel- 
number> were specified; it performs the same function as the LINPUT statement for terminal I/O. 
If a nonzero channel is specified, execution is similar to the LINPUT statement for terminal I/O, ex- 
cept that no prompt is transmitted and the string of characters starting at the current position of the 
file’s pointer and continuing to the end of the record is assigned as the value of <string-variable>. 
Following this assignment, the file’s pointer is positioned at the beginning of the next record in the 
file. 


If LINPUT is requested from an INTERNAL format file, a fatal error occurs. 
Examples of file LINPUT statements: 


LINPUT #1: A$ 
LINPUT 4#N: A$ 


File MAT INPUT Statement 


The file MAT INPUT statement reads data from disk files. The syntax and semantics of the file MAT 
INPUT statement follow. 


Syntax: 


—— MAT INPUT #< channel-number>: —> 


$ 


< array-name> 


< array-name> (?) 


<channel-number> is a numeric expression which must evaluate to an integer in the range 0 to 255, 
and designates the file to be accessed. <array-name> follows the same naming conventions as used 
for simple variables. <subscript> is a numeric expression. This numeric expression must evaluate to 
a number which is greater than or equal to the lower-dimension bound for arrays in the program. <ar- 
ray-name> (?) specifies a variable-length vector. 
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Semantics: 


In a file MAT INPUT statement, values are assigned to the specified arrays from data in the file as- 
signed to the specified channel. Input from channel zero is executed as if no channel were specified. 


When input is received from a nonzero channel, no prompts are output. It is not necessary that all 
the values required by a file MAT INPUT statement be supplied by a single record of the file. Each 
time a file MAT INPUT requires a value from a file, the data element which begins at the current 
position of the file pointer is used to supply that value. The type of this data element must correspond 
to the type of the array element to which it is assigned. After the value has been supplied, the file 
pointer is advanced to the beginning of the next data element in the record if more data follow in 
the record, and to the beginning of the next record of the file otherwise. 


Following the execution of a file MAT INPUT statement, the file pointer is advanced to the beginning 
of the next record in the file, unless the statement ends with a final comma (,) character. If the state- 
ment does end with a comma (,) character, the file pointer remains where it was until subsequent 
I/O operations take place. _If the file pointer is positioned in the middle of arecord, the file pointer 
is advanced to the beginning of the next record. 


Examples of file MAT INPUT statements: 


MAT INPUT #1: A$ 
MAT INPUT #K: B(3,3),C(?) 
MAT INPUT #K*2: X,Y(9) 


File Output 


File output statements write data to files. The two file output statements, the OUTPUT statement and 
the MAT OUTPUT statement, are described in the following paragraphs. 


OUTPUT Statement 


The OUTPUT statement allows data to be transferred from variables within a program to a disk file. 
The syntax and semantics of the OUTPUT statement follow. 


Syntax: 


OUTPUT # <channel-number > 


<expression > 
TAB ( <index> ) 
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<channel-number> is a numeric expression which must evaluate to an integer in the range 0 to 255, 
and specifies the channel through which data transfer takes place. <expression> is any numeric or 
string expression. The list of <expression>s or TABs specifies the items which are written when the 
OUTPUT statement is executed. <index> is a numeric expression which, when evaluated, becomes 
the position within the file where the next <expression> is printed. 
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Semantics: 


The execution of the OUTPUT statement is similar to the execution of the PRINT statement. The fol- 
lowing paragraphs explain the differences between the two statements. 


If the <channel-number> is nonzero, the output media is disk instead of terminal. 
The end-of-line character is the end-of-record for the file. 


The margin is the record length and the columnar position is one more than the number of characters 
generated since the last end-of-record. 


The OUTPUT statement may be used with a file whose format is either DISPLAY or INTERNAL. 


Output to a file is appended to the file starting at the current position of the file’s pointer. Any data 
previously in the file beyond the file pointer are lost. When an output operation is complete, the file 
pointer is positioned at the end of the file. 


When an OUTPUT statement that ends with a comma or a semicolon is executed, the last record trans- 
mitted to the file has no end-of-record. However, if input is requested from a file left in this state, 
if the file is closed, or if its pointer is reset to the beginning of the file, an end-of-record is appended 
to the file before the requested operation is performed. 


A fatal error occurs if the length of a string written to an INTERNAL format file exceeds the 
maximum record length of that file. 


Examples of file OUTPUT statements: 


OUTPUT #N 
OUTPUT #N: "X EQUALS’; X 
OUTPUT #3: TAB(10); A$; “IS DONE.” 


MAT OUTPUT Statement 


The MAT OUTPUT statement writes data to disk files. The syntax and semantics of the MAT OUT- 
PUT statement follow. 


Syntax: 
—— MAT OUTPUT #< channel-number>: < array-name> 


> 


<channel-number> is a numeric expression which must evaluate to an integer in the range 0 to 255, 
and designates the file to be accessed. <array-name> follows the same naming conventions as used 
for simple variables. 
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Semantics: 


If the file assigned to the channel specified in the MAT OUTPUT statement is a display format file, 
execution of that statement writes a string of characters including end-of-record characters to the file. 
If the output is to go to channel zero, this string is generated exactly as in the execution of a MAT 
PRINT statement. If the output is to go to another channel, the same rules apply, with the end-of- 
line, margin, and columnar position being treated as follows. The end-of-line is the end-of-record for 
the file, the margin is the record length of the file, and the columnar position is one more than the 
number of characters generated since the last end-of-record character. 


Output to a file is appended to the file starting at the current position of the file pointer; any data 
previously in the file following that position are lost. When output is complete, the file pointer is posi- 
tioned at the end of the file. 


If the file assigned to the channel specified in a MAT OUTPUT statement is an internal format file, 
execution of that statement generates a sequence of values for transmission to the file, with each value 
being followed by an end-of-record character. The sequence of values is the same as if output were 
to a display format file. 
Examples of MAT OUTPUT statements: 

MAT OUTPUT #1: A$ 


MAT OUTPUT #K: B; C, 
MAT OUTPUT #K*2: X; 


Exception Statement 
The exception statement allows programmatic action when the end of a file is encountered. 


Syntax: 


AT EOF # <channel-number > THEN <line-number > oO 
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<channel-number> is a numeric expression which must evaluate to an integer in the range 0 to 255, 
and specifies the channel through which data transfer takes place. <line-number> is a line number 
which specifies the place where execution continues if an end-of-file condition occurs for the file 
specified by <channel-number >. 


Semantics: 


An end-of-file condition occurs when the amount of data remaining in the file is not enough to satisfy 
a request for input from that file, or when the physical end of a finite-capacity file is reached before 
output to that file is completed. Execution of an exception statement specifies the line number at which 
execution continues whenever an end-of-file occurs during a data transfer operation on the specified 
channel. The statement itself does not test for an end-of-file condition existing, nor does it branch, 
that is, transfer control to a line number other than the one next in sequence, it only specifies the 
action to be taken when an end-of-file condition is detected. If no exception statement is executed for 
a given channel prior to the occurrence of an end-of-file condition for that channel, a fatal error re- 
sults. If more than one AT EOF statement is executed for a <channel-number>, the latest one 
executed takes precedence if an end-of-file condition occurs. 


The effect of the exception statement is nullified if the file assigned to <channel-number> is closed. 
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Example of the use of an exception statement: 


100 AT EOF #2 THEN _ !Go to line 400 when end-of- file 
400 ! is detected. 

200 INPUT #2: A, B$ 

300 GOTO 200 

400 STOP 


File Control Statements 

File control statements are provided to: control the position of a file pointer for an open file, erase 
the contents of a file, and inquire about certain attributes of a file. There are three statements that 
accomplish these tasks: 1) the file RESTORE statement, 2) the SCRATCH statement, and 3) the IN- 
QUIRE statement. 

File RESTORE Statement 

The file RESTORE statement resets the pointer for a file to the beginning of the file. 


Syntax: 


RESTORE # <channel-number > os ; 


G18068 


<channel-number> is a numeric expression which must evaluate to an integer in the range 0 to 255. 


Semantics: 


Execution of a file RESTORE statement resets the pointer for the file assigned to the specified channel 
to the beginning of the file. 


Examples of file RESTORE statements: 


RESTORE #1 
RESTORE 415 


SCRATCH Statement 


The SCRATCH statement erases the contents of a file and resets the pointer to the beginning of the 
file. 


Syntax: 


SCRATCH # <channel-number > i 


G18069 


<channel-number > is a numeric expression which must evaluate to an integer in the range 0 to 255. 
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Semantics: 

Execution of a SCRATCH statement erases the contents of the file assigned to the specified channel 
and resets the pointer for that file to the beginning of the file. If the <channel-number> is zero, no 
action occurs. 


Examples of SCRATCH statements: 


SCRATCH #2 
SCRATCH #Z 


INQUIRE Statement 


The INQUIRE statement solicits information concerning a file. The syntax and semantics of the IN- 
QUIRE statement follow. 


Syntax: 


~— INQUIRE ——#—— < channel-number> —— : —> 


1 ’ 
ACCESS < string-variable> ele 


FILE TYPE 


NAME 
ORGANIZATION 
RECORD LENGTH 
RECORD TYPE 


STATUS 


<string-variable> is a string variable as described under String Variables in Section 5. <channel-num- 
ber> is a numeric expression which must evaluate to an integer in the range 0 to 255, and designates 
the file to be accessed. The items included in a complete circuit of this syntax diagram are referred 
to as an inquiry item. 


Semantics: 


Execution of an INQUIRE statement causes the <string-variable>s in the inquiry items to be assigned 
values corresponding to the attributes (such as ACCESS, NAME, and STATUS) of the file currently 
assigned to the specified channel. Each <string-variable> is assigned a value corresponding to the at- 
tribute which immediately precedes it. If the channel is inactive, all <string-variable>s are assigned 
the value NONE. The values corresponding to the attributes are shown in the following table. 
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Attribute Values 
ACCESS INPUT, OUTPUT, or OUTIN 
FILE TYPE DISPLAY, or INTERNAL 
NAME Name of the file assigned to the channel 
ORGANIZATION SEQUENTIAL 
RECORD LENGTH STRS(N), N is the maximum length of records 

in the file 

RECORD TYPE VARIABLE 
STATUS OPEN, INPUT, OUTPUT, SCRATCH, RESTORE, or END OF 


FILE. Value »csigned depends on most recent file operation 


Examples of INQUIRE statements: 
INQUIRE #3: NAME N$, ACCESS A$, FILE TYPE T$ 


INQUIRE #N: STATUS S$ 
INQUIRE #2: FILE TYPE Z$(1:8), STATUS Z$(10:25) 
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SECTION 10 
DEBUGGING AIDS 


Three statements are provided in BASIC for the purpose of debugging a program. They are the DE- 
BUG statement, the BREAK statement, and the TRACE statement. 


DEBUG STATEMENT 


The DEBUG statement either activates or deactivates the debugging facilities in BASIC. The statements 
available to the user when debugging is active are the BREAK and the TRACE statements. The syntax 
for the DEBUG statement follows. 


Syntax: 


cian Rental a 
OFF 

G18070 

Semantics: 

DEBUG ON activates debugging. DEBUG OFF deactivates debugging. The default is DEBUG ON. 


Examples of DEBUG statements: 


DEBUG ON 
DEBUG OFF 


BREAK STATEMENT 


The BREAK statement causes program execution to be temporarily stopped. The syntax for the 
BREAK statement follows. 


Syntax: 


BREAK Oo 


G18071 


Semantics: 

When debugging is active and a BREAK statement is executed, program execution is stopped and a 
message is sent to the terminal. This message informs the user that a break has occurred and gives 
the line number where execution stopped. Execution may be continued by the execution of a CONTIN- 
UE or a STEP command. The STEP and CONTINUE commands are described in Section 11. 


If debugging is not active, the BREAK statement has no effect. 
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TRACE STATEMENT 


The TRACE statement causes each source line (a line of source code) of a program to be displayed 
as it is executed. 


Syntax: 


G18072 
Semantics: 


When debugging is active and a TRACE ON statement is executed, tracing is turned on. When tracing 
is on, each source line is displayed on the terminal as it is executed. TRACE OFF turns tracing off. 
If debugging is not active, the TRACE statement has no effect. 


NOTE 
If TRACE ON is in effect and DEBUG is switched off, tracing continues un- 
til DEBUG ON is set and a TRACE OFF statement is executed. 


Examples of TRACE statements: 


TRACE ON 
TRACE OFF 


Example of TRACE ON output: 


90 IF A = B THEN 150 

100 IF A < B THEN 130 

130B=B-—A 

140 GO TO 90 

90 IF = B THEN 150 

< B THEN 130 

B-A 

140 GO TO 90 

90 IF A = B THEN 150 

150 PRINT "THE GREATEST COMMON DIVISOR OF;C;"AND";D;"IS";A 
THE GREATEST COMMON DIVISOR OF 10 AND 5 IS 2 
160 PRINT 


170 PRINT "DO YOU WANT TO CONTINUE? Y OR N” 
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SECTION 11 
SYSTEM COMMANDS AND CAPABILITIES 


System and editing commands are provided to allow the user to interact with IBASIC in Command 
mode. 


SYNTAX DEFINITIONS 


Several of the system commands described in this section require the use of the constructs explained 
in this subsection. These constructs are line number range, BASIC file name, pack name, and MCP 
file name. 


Line Number Range 
A line number range allows a successive group of lines to be specified in a command. 


Syntax: 


<line-number1 > 
FIRST 


<line-number2 > 
END 


G18073 


The line number syntax is diagrammed under Statement Lines in Section 3. <minus> is a minus sign 


(-). 
Semantics: 


<line-number2> must be greater than or equal to <line-numberl>. Also, the pseudo line number 
FIRST, which refers to the first line in the program, must refer to a line number smaller than or equal 
to <line-number2>. The pseudo line number LAST (or END) must refer to a line number greater 
than or equal to <line-numberl>. The special cases of FIRST TO LAST or ALL refer to the entire 
program. 


Examples of valid line number ranges: 


100-200 

FIRST TO 

3000 

2000 — LAST 

FIRST 

ALL 

FIRST TO 200 !First lines <= 200. 
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Examples of invalid line number ranges: 


200-100 

3000 TO 

FIRST 

LAST TO 

2000 

END — 100 

FIRST TO 200 ! Where the first line > 200. 


BASIC File Name 


Syntax: 


9 


< alphanumeric > 


ft, 
- <character > ” 


<character> is any character valid to the MCP. <alphanumeric> is an alphabetic character or 
decimal digit. 


G18074 


A BASIC file name, that appears inside quotation marks, can contain a quotation mark by using two 
consecutive quotation marks instead of one (for example, "MY”” FILE”). A BASIC file name, that 
does not use quotation marks, is translated to upper-case characters and must begin with an alphanu- 
meric character. 


A BASIC file name cannot begin with an asterisk (*), space ( ), or equal sign (=). The file name 
can begin with a number sign (#) as long as the name is within quotation marks. The first and last 
characters of a BASIC file name cannot be a left parenthesis and a right parenthesis, respectively. 


Examples of valid BASIC file names: 


ABCD 

1234 

P.Q 

uN ! wey #$ wt 

Q123ABC 

abcd (equivalent ABCD) 
i abcd i 

c..-d 
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Examples of invalid BASIC file names: 


ABCDEFGHIJK 
1" #S 

.ABC 

"qwe 

*ABC 

(ME) 

"(ME) " 


Pack Name 


Syntax: 

i <BASIC-file-name > 7 aa 
«“ <upto 10 blanks > » 

G18075 


A pack name can contain up to 10 characters according to the same formation rules as described under 
BASIC File Name in this section. Spaces for the pack name indicate the system pack. 


Examples of valid pack names: 


USER.242 
e¢ 1&2 9s 


ee 9? 


Examples of invalid pack names: 


(ME) 
= or 


“ee 3° 


46 9? 


MCP File Name 


Syntax: 


<BASIC-file-name > / <BASIC-file-name > 


* <BASIC-file-name > 


( <BASIC-file-name > ) 
* ( <BASIC-file-name > ) 
G18076 


The use of quotation marks in a <BASIC-file-name> needs further explanation in relation to an MCP 
file name. If the first BASIC file name uses quotation marks, they must enclose any asterisk, and/ 
Or parentheses used. 
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Examples of valid MCP file names: 


(IBASIC)/PQR 
XYZ 
XYZ/P.Q.R 
*QWER 
*(QWER)/LKJ 

a * AS$SF wf 

H *(qwer)”/ "7xcev" 
X_Y/L.K 


Examples of invalid MCP file names: 


"(IBASIC)/PQR” 
*" QWER” 
X$/Y$ 

X/= 

" ASD” 

" (qwe" 


Be = 
SYSTEM COMMANDS 


System commands can be entered at any time, although their effect may depend upon the state of the 
BASIC environment. Unless stated to the contrary, the effect of the command is immediate. These 
commands cannot be preceded by a line number nor can they be imbedded within a BASIC statement 
or BASIC command. The system commands are listed in alphabetical order. 


BYE Command 


The BYE command causes the BASIC environment to be cleared and the IBASIC program to go to 
EOJ, unless the IBASIC program was initiated under SMCS with an initial parameter or NO EOJON- 
LOGOUT, in which case the IBASIC program waits for another user to sign on (refer to Initial Param- 
eters in appendix C). The state of the BASIC environment is examined and the IBASIC program does 
not go to EOJ if either of the following conditions is true: (1) the source file is not saved, or (2) the 
BASIC environment is running. 


Syntax: 


BYE —_—____—_ 


G18077 
Semantics: 


The action of the BYE will not occur if either of the following conditions applies: the source file is 
not saved or the BASIC environment is running. 
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CONTINUE Command 


The CONTINUE command causes the BASIC environment to continue execution from wherever it last 
stopped. 


Syntax: 
CONTINUE 
1 TRACE 
1 PRINT 
G18078 
Semantics: 


When a CONTINUE command is entered, the BASIC data environment is not cleared, that is, data 
variables retain the values they had when the BASIC environment last stopped. A RUN or WALK 
command must precede the use of the CONTINUE command. 


Certain editing functions, for example, deletion of the next statement to be executed, changing the di- 
mensions of an array, or changing a FOR NEXT statement, cause the CONTINUE command to be 
disallowed until after a RUN or WALK command is executed. 


The TRACE option causes the statements to be displayed on the remote device as they are executed. 


The PRINT option causes the output from BASIC PRINT statements and the input from BASIC IN- 
PUT and LINPUT statements to be written to the file LINE and to the remote device. The file LINE 
is closed on execution of an END statement in the BASIC program. 


If both the PRINT and TRACE options are specified, the trace of statements executed is directed to 
the file LINE interspersed with the BASIC PRINT, INPUT, and LINPUT output, and is not displayed 
on the remote device. 


The PRINT and TRACE options have effect until the program is stopped by a STOP statement, an 
END statement, or by a fatal error. 


The CONTINUE command has effect only when the BASIC environment is in a stopped state. 


Examples of CONTINUE statements: 
CON 


CON TRACE {Continue and commence tracing. 
CONTINUE 


CONTINUE TRACE ! Continue and commence tracing. 


CON PRINT TRACE  !Continue, and commence or continue 
! writing to file LINE. 


CON PRINT ! Continue, commence tracing, and 
1 writing to file LINE. 
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DELETE Command 


The DELETE command deletes the specified line numbers from the workfile file. 


Syntax: 

oe yp 
<line-number > 

G18079 


<line-number> is described under Lines in Section 3. <line-number-range> is described under Line 
Number Range in this section. <line-number> and <line-number-range> must specify lines that actu- 
ally exist. 


Semantics: 


If the deleted line would have been the next line executed, program execution can be initiated only 
by entering a RUN or WALK command. 


The line numbers requested must be present in the workfile. No deletion occurs if any requested line 
number is not present in the workfile. 


If the BASIC environment is running, the DELETE command is ignored. 


Examples of DELETE commands: 


DELETE 123 ! Delete line 123 only. 
DELETE 2000-3000 

123 ' Delete line 123 only. 
DELETE 4000 TO LAST 

DEL FIRST 


DEL FIRST TO 100 
DEL FIRST TO LAST ! Delete all program 
! statements. 


EDIT Command 


The EDIT command initiates edit mode. The syntax and semantics of the EDIT command follow. 


Syntax: 


Le 
ERRORS 


< line-number > 


FROM 
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Semantics: 


In edit mode, each line of a program is presented one line at a time for review and possible change. 
Editing of a program can begin either at the beginning of the program or at a particular point (line 
number) within the program. Edit mode is terminated when either the end of the program is reached, 
by explicitly using the pseudo break feature, or by entering a command instead of a statement. If the 
line number is changed in the process of editing a statement, the next line after the new line is displayed 
for editing. 


A variant of edit mode is the edit-errors mode. In this mode, the next line which contains a syntax 
error is displayed for editing. 


The EDIT command is only valid from a screen type terminal, such as the MT983 or the TD830 series 
terminal. 


Examples of the EDIT command: 


EDIT 
EDIT ERRORS 
EDIT FROM 23450 


FILE Command 


The FILE command provides the capability to obtain information about a disk file. The syntax and 
semantics of the FILE command follow. 


FILE < MCP-file-name > 
i: < filename > / = 


<MCP-file-name> and <pack-name> are described under Syntax Definitions in this section. < file- 
name> is constructed according to the rules for the family name portion of <MCP-file-name>. 


Syntax: 


ON < pack-name > 


G18080 


Semantics: 


The FILE command scans the disk directories available to the current usercode (refer to Scope of File 
Access in the Glossary) to determine whether the file exists. If the file exists, information about it is 
returned. If no <pack-name> is specified, the default pack associated with the current usercode is 
queried. If the <file-name>/= option is used, a sorted list of files with a family name of <file- 
name> is returned. 


If the “=” option is used, a sorted list of the files in the current directory is returned. 
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Examples of FILE statements: 


FILE IBASIC 

FILE *XY 

FILE X/Y ON P 

FILE (PQR)/ZXY ON USER 

FILE BLACKJACK ON ”” ! Look for BLACKJACK on 
! system pack. 


FIND Command 


The FIND command is equivalent to the XREF command. Refer to the XREF command in this sec- 
tion. 


FIX Command 


The FIX command enables the user to change portions of one or more lines without re-entering the 
entire line. 


Syntax: 


FIX | Pena <delim > <text > <delim > <new-text > ; (aeeereeaan 
<line-number-range > <delim > — 


G18081 


<line-number-range > is described under Syntax Definitions in this section. <delim> can be any char- 
acter other than A through Z, 0 through 9, or space. <text> may be any string of characters exclud- 
ing <delim> and may contain no characters, in which case <new-text> is inserted after the line num- 
ber of the line scanned, and the rest of the line is shifted right accordingly. <new-text> may be any 
string of characters excluding <delim>. If the trailing <delim> is omitted, any trailing blanks are 
not included in <new text>. <new-text> may contain no characters, implying that occurrences of 
<text> are deleted from the scanned line, and that the rest of the line is shifted to the left accord- 
ingly. 


Semantics: 

The FIX command searches the specified <line-number-range> for the occurrence of the required 
<text >, replaces each occurrence of <text> within each line scanned with the <new-text>, and dis- 
plays the new line. If <text> and <new-text> are not the same length, the rest of the line is shifted 
appropriately. 

If the <line-number-range> is omitted, the whole program is scanned. 

If a statement is changed, the modified statement is checked for syntax and included in the current 
file. As a result, the previous line having the line number of the modified statement is overwritten. 
Any syntax errors that result must be resolved before the program can be run. 


If the resulting statement exceeds 256 characters, the excess is truncated. No warning message is given. 
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Examples of FIX commands: 


FIX /3.14159/PI 
FIX 100 .X/Y.Y/X 
FIX LAST /END/END §! Move the END statement 


! three characters to the right. 


FIX 2230 TO 2500 ::: ! Make lines 2230 through 2500 
! comment lines. 


GET Command 


The GET command allows BASIC source files to be loaded into the BASIC environment. 


GET <MCP-file-name > oi 
ON <pack-name > 


<MCP-file-name> and <pack-name> are described under the heading Syntax Definitions in this sec- 
tion. 


Syntax: 


G18082 


Semantics: 


The GET command searches the directory for <MCP-file-name> and proceeds to load the file into 
the BASIC environment. If any syntax errors are found in the file, suitable error messages are emitted 
and the file cannot be run until these errors are fixed. If syntactically incorrect statements are listed 
with the LIST command, they are highlighted: reverse video on TD820 and TD830 terminal types, pre- 
ceded by an asterisk (*) otherwise. 


Only those files within the current usercode scope of access are available. The default pack for the 
current usercode can be overridden by using the ON option. 


Various parameters of the file are checked to make sure that it is a BASIC source file; for example, 
file type is data, record size is less than or equal to 256 bytes, and number of records is less than 
the maximum allowed (1979 records). Any record in this file which does not start with a valid line 
number is not included in the loaded file. The records in the file do not have to be in strict line number 
sequence. The lines are entered in the workfile just as if they were being entered from the terminal. 
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Examples of GET commands: 


GET BLACKJACK 


— 


Load BLACKJACK from default 


! pack. 
GET PQR ON ”” ! Load PQR from system pack. 
GET *MYPROG ! Load MYPROG from system 


— 


pack, bypassing usercode defaults. 


— 


GET (HIS)/FILE Access another user's file. 


ed 


GET (MY)/FILE ON OTHER Load a file from a specific 


pack. 


7 


HELLO Command 
The HELLO command allows a user to log on or Off. 


Syntax: 


HELLO 


<usercode > 


/ < password > 
G18083 


Formation of a <usercode> follows the same rules as for a <BASIC-file-name> except that the max- 
imum length of a <usercode> is seven characters. Formation of a <password> follows the same 
rules as for a <BASIC-file-name>. The syntax for a <BASIC-file-name> is described in this section 
under Syntax Definitions. 


Semantics: 


If only “HELLO” is entered, a log off function is requested. Log off occurs only if the current BASIC 
environment permits. Refer to conditions for the BYE command in this section. If the HELLO com- 
mand is allowed, the current BASIC environment is cleared, and only the HELLO, BYE, and TEACH 
commands are allowed thereafter. 


If <usercode> and, optionally, <password> follow HELLO, an implicit log off of the current user- 
code is performed, if necessary, followed by a log on of the requested usercode/password pair. 


The <usercode> and <password> pair must be in the SYSTEM/USERCODE file if IBASIC was 
executed under a privileged usercode. (Refer to the B 1700/B 1800 Systems System Software Operation 
Guide, Volume 2, form number 1108966 for more information on privileged usercodes.) If IBASIC 
is not running under an MCP usercode, <password> has no meaning and is not allowed (refer to 
Usercode Considerations in Appendix C). 


HELLO is ignored if the IBASIC system is not privileged (refer to Usercode Considerations in Appen- 
dix C for more information on a privileged IBASIC system). 
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Examples of HELLO commands: 


HELLO ME/ SECRET —$! Log ME on. 
HELLO ! Log off, if allowed. 


HELLO MYOWN 1 Log on, not running under 
! the MCP usercode system. 


LIST Command 


The LIST command causes the requested lines or all of the current program to be listed at the remote 
terminal. 


ee _ fit! 
<line-number-range > PRINT 


<line-number-range> is described under Syntax Definitions in this section. 


Syntax: 


G18084 


Semantics: 

With the LIST command, any syntactically incorrect lines are highlighted by means of reverse video 
(for TD820 and TD830 terminals) or a preceding asterisk (*). If the line which is displayed would be 
the next line executed as a result of a CONTINUE or STEP command, it is highlighted by means of 


bright video (for TD830 terminals) or by a preceding greater than sign (>) (for all other terminal 
types). 


If the PRINT option is requested, the list is written to the file LINE and not to the remote device. 
The file LINE is defined as a printer file. 


Examples of LIST commands: 


LIST ! List the whole program. 


LIST FIRST TO 100  ! List up to line 100. 


LIST 1234 ! List line 1234 only. 


LIST PRINT ! List the current file on 
the printer. 
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MAKE Command 
The MAKE command allows a file to be named and created. 


Syntax: 


MAKE <BASIC-file-name > —__$__________________| 


G18085 


<BASIC-file-name> is described under Syntax Definitions in this section. 


Semantics: 


The MAKE command clears the BASIC environment under the same restrictions as the BYE command 
and prepares for entry of a file to be called <BASIC-file-name>. If <BASIC-file-name> already 
exists, the MAKE command is ignored. 


If no MAKE command has been entered, IBASIC will still accept BASIC statements (line number pres- 
ent) and put them into the current workfile, but the file must be named (TITLE or SAVE AS com- 
mand) before it can be saved. 


Examples of MAKE commands: 


MAKE NEWPROG 
MAKE "ODDNAME?” — ! Quotation marks used because of 
! special character "?”. 


MERGE Command 


The MERGE command allows BASIC source code (BASIC language statements) to be merged into the 
workfile. 


MERGE <MCP-file-name 1 eal 
| <line-number-range > - — ON <pack-name > 
FROM 


<line-number-range>, <MCP-file-name>, and <pack-name> are described in this section. 


Syntax: 


G18086 


Semantics: 


The MERGE command searches the directory for <MCP-file-name> and proceeds to load the re- 
quested portion of it (or the entire file if <line-number-range> is omitted) into the current BASIC 
environment. If a line that already exists is merged, the new merged line overwrites the existing line. 
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The merged file need not necessarily be in ascending line number sequence. The MERGE command 
searches the whole merged file, and if there are duplicate line numbers to be merged, the physically 
last in sequence is the one finally merged. 

If a syntax error is found in a merged line, a suitable error message is displayed on the terminal, and 
runs of the file are inhibited until these errors are fixed. If those syntactically incorrect statements are 
listed with the LIST command, they are highlighted by reverse video on TD820 and TD830 terminal 
types, or preceded by an asterisk (*), otherwise. 


Only those files within the current usercode scope of file access are available. The default pack for 
the current usercode can be overridden by using the ON option. 


Various parameters of the file are checked to make sure that it is a BASIC source file; for example, 
file type is data, record size is less than or equal to 256 bytes, and number of records is less than 
the maximum allowed (approximately 2000 records). 


Any record in the merged file which does not start with a valid line number is ignored. 


Examples of MERGE commands: 


MERGE OTHER/FILE ! Merge the whole of OTHER/ 
! FILE into the current environment. 


MERGE 1000 TO 2000 FROM OTHER/ FILE 


MERGE LAST OTHER/FILE ON OTHERPACK 


PASSWORD Command 
The PASSWORD command changes the password for the current usercode in the MCP usercode file. 


Syntax: 


PASSWORD <old-password > <new-password > <(new-password > ———_____________| 


Formation of <old-password> and <new-password> follow the same rules as for a <BASIC-file- 
name>. 


G18087 


Semantics: 


The PASSWORD command is only valid if the IBASIC system runs under an MCP usercode. The 
new password must be entered twice identically to ensure correct and intentional entry. 


Example of a PASSWORD command: 


PASSWORD SECRET TOPSECRET TOPSECRET 
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Psuedo Break Feature 
The pseudo BREAK feature can be used to prematurely terminate a function. 


Syntax: 


@ BBR 


G18088 


To terminate a function, a special message of the precise form .BRK with no leading or trailing spaces 
can be entered, the SPCFY key can be depressed for CRT terminals, that is, display screen terminals, 
or the BREAK key can be depressed. (The BREAK key is supported for TTY-type devices and has 
the same effect as .BRK; however, the BREAK key is only effective on these devices during the printing 
of an output message.) 


Semantics: 


This pseudo BREAK feature may be used from any supported terminal type to terminate the following 
commands: LIST, RUN, WALK, CONTINUE, STEP, GET, SAVE, FIX, RENUMBER and a CHAIN 
statement or command. 


In addition, a pseudo BREAK may be used to terminate the automatic recovery of a prior user session, 
the period of time during which a user is logged on. If a pseudo BREAK is used in this context, that 
session is thereafter irrecoverable. Refer to Recovery in this section for more information on automatic 
recovery. 


-BRK may also be used to interrupt the execution of an INPUT or LINPUT statement which is current- 
ly soliciting a response from the remote terminal. In the case of CRT terminals, .BRK must be typed 
over the input prompt character in the top left portion of the screen. Interruption of an INPUT or 
LINPUT statement also implies changing the state of the BASIC environment from running to stopped. 


RENAME Command 
The RENAME command provides the capability of changing the name of a file. 


Syntax: 


RENAME <BASIC-file-name1 > | eae | cee <BASIC-file-name2 > ——| 
ON <pack-name > AS 


G18089 


< BASIC-file-namel >, <BASIC-file-name2>, and <pack-name> are described under Syntax Defini- 
tions in this section. 


Semantics: 
The RENAME command checks for the presence and availability of <BASIC-file-namel > on the re- 
quested pack, ensures the absence of <BASIC-file-name2>, and causes the MCP to change the name 


of <BASIC-file-namel > to <BASIC-file-name2>. Only files within the current user’s scope of ac- 
cess for files may be changed. 
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Examples of RENAME commands: 


RENAME ORANGES AS LEMONS _$! On default pack. 
RENAME PROGI ON ”” AS PROG ! Force change on system pack. 
RENAME X Y 


RENUMBER Command 


The RENUMBER command is used to resequence the line numbers in a BASIC source program. 


Syntax: 


RENUMBER 


<line-number-range > STEP <increment > 


1 AT <line-number > 
G18090 


<line-number-range> is described under Syntax Definitions in this section. <Jine-number> is de- 
scribed under Statement Lines in Section 3. <increment> is an integer constant. 


Semantics: 


The RENUMBER command is used to resequence the line numbers of, and the references to, all or 
part of the currently loaded source program. The STEP parameter defines the amount to increment 
each new line number. The AT parameter defines the starting value for the new numbers. If the STEP 
parameter is omitted, a value of 10 is assumed. If the AT parameter is omitted, a value of 100 is as- 
sumed. 


Before the actual renumbering is done, checks are performed to make sure that (1) no overlap of exist- 
ing statements would occur, (2) the order of execution of statements is not changed, (3) a previously 
unresolved line number reference would not become implicitly resolved by the renumber process, and 
(4) the last line number in the program would not exceed 99999. 


The RENUMBER command cannot be interrupted by the pseudo BREAK feature. If the system fails 
during a RENUMBER command, the workfile may be partially renumbered. 
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Examples of RENUMBER commands: 


RENUMBER 'Renumber the whole 
! program 
'with implicit step 10 and 
'starting with a value of 100. 


RENUMBER 100 TO 1000 !Renumber the specified part 
!of the program and all 
'references to that part 
! with the default parameters. 


RENUMBER 5000 TO LAST AT 5000 STEP ! Renumber the 

100 ! last part of the program, 
! incrementing the line 
!numbers by 100. 


RUN Command 
The RUN command causes a program to be executed. 


Syntax: 


RUN 


<line-number > 


G18091 


<line-number> is described under Statement Lines in Section 3. 
Semantics: 


The RUN command initiates the continuous execution of the statements in the current workfile, start- 
ing either from the first statement in the workfile, or from <line-number>, if specified. The BASIC 
data environment is cleared so that all numeric data items are zero and all string items have the value 
of the null string ("”). The line number, if specified, must be a valid line number within the program. 
RUN <line-number> causes the program to be executed as if GOTO <line-number> were the first 
statement of the program. 


The TRACE option causes the statements to be displayed on the remote device as they are executed. 
The PRINT option causes the output from BASIC PRINT statements and the input from BASIC IN- 


PUT and LINPUT statements to be written to the file LINE as well as to the remote device. The file 
LINE is closed on execution of an END statement in the BASIC program. 
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If both the PRINT and TRACE options are specified, the trace of statements executed is directed to 
the file LINE interspersed with the BASIC PRINT, INPUT, and LINPUT output. In this instance, 
the traced statements are not displayed on the remote device. 


The PRINT and TRACE options have effect until the program is stopped by a STOP or END state- 
ment or by a fatal error. 


Examples of RUN commands: 


RUN ! Run the program from its first 
executable statement. 


o— 


RUN TRACE ! Run the program from its first 
! executable statement and trace 
execution. 


ome 


RUN 1234 { Run from line 1234 and clear the 
program’s data variables. 


—— 


RUN PRINT ! Print output to be written to file 
! LINE. 


SAVE Command 


The SAVE command causes the current workfile to be saved on disk. 


7 eo | 
AS <BASIC-file-name > ON <pack-name > FOR CANDE 


< BASIJC-file-name> and <pack-name> are described under Syntax Definitions in this section. 


Syntax: 


G18092 


Semantics: 


The SAVE command writes the current source program to a file on the current usercode default 
pack with the name of the current file. The pack can be overridden by the ON option and the 
name can be overridden by the AS option. 


If the FOR CANDE option is used, an attempt is made to make the saved file compatible with 
CANDE BASIC files: leading zeros are appended to the line numbers, if necessary, to make them five 
characters long. The resulting line is checked for a maximum of 80 characters. If a line exceeds 80 
characters, the save is not done, and a message is emitted to identify the line (or lines) which cannot 
be made compatible. 


If the current workfile does not have a name associated with it, either the AS option or the TITLE 
command must be used to associate a name with the workfile. 
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If the DEBUG WW initial parameter or the switch SW=W option is used (refer to appendix C), the 
current file takes the name of the AS file if present, as if a TITLE command had been used. 


Examples: 
SAVE ! Save the current workfile. 
SAVE AS PQR ON P ! Save the current workfile on 
! pack P with name PQR. 
SAVE FOR CANDE ! Save the current workfile and 
! attempt to make the file compatible with 
! CANDE. 


SCRATCH Command 


The SCRATCH command causes a file to be removed or the current environment to be cleared, or 
causes both. 


Syntax: 


SCRATCH 


<BASIC-file-name > 


ON <pack-name > 
G18093 


Semantics: 


< BASIC-file-name> and <pack-name> are described under Syntax Definitions in this section. 


The SCRATCH command is used to clear the current BASIC code and data environment or to remove 
a file in the current usercode scope of access from the disk directory. If no file name follows 
SCRATCH, the clearing of the current file in the BASIC environment is assumed. If the file name 
is specified, files can be removed from disk, from the default pack, or from an explicit pack if the 
ON option is used. The scratched file is irrecoverably removed. 


Examples of SCRATCH commands: 


SCR ! Clear the current workfile. 
SCRATCH ! Remove OLDFILE from the 
OLDFILE ! user’s directory. 


SCR BADFILE ON P_ ! Remove BADFILE from the 
! user’s directory on pack P. 
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SEQUENCE Command 


The SEQUENCE command initiates sequence mode on a screen type terminal. The syntax and seman- 
tics of the SEQUENCE command follow. 


Syntax: 
—— SEQUENCE 
STEP —— < increment> 
AT < line-number> 
Semantics: 


In sequence mode, line numbers are generated in sequence, starting at <line-number> and increment- 
ing by <increment>, at the top of the screen ready for statement entry. If the generated line number 
corresponds to a line that already exists, the source line is displayed in a fashion similar to edit mode. 
If, after entry of a line, a line is found between the last entered line and the next line in sequence, 
that intermediate line is displayed as in edit mode. 


Sequence mode is terminated if the generated line number exceeds 99999, if the pseudo break feature 
is used, or if any command is entered in the normal fashion. 


If <line-number> is not specified, a value of 100 is assumed. If STEP <increment> is omitted, a 
value of 10 is assumed. 


Examples of the SEQUENCE command: 


SEQ 

SEQ STEP 100 
SEQUENCE AT 1000 
SEQ 1000 STEP 100 


STEP Command 


The STEP command causes single stepping of a program. Single stepping is stopping after the execu- 
tion of a statement. 


Syntax: 


STEP Sa Reale de | 


G18094 

Semantics: 

The STEP command can be used during the execution of a program when the BASIC environment 
is stopped. It causes the next statement to be displayed and then executed. After this statement, an 


implicit BREAK statement is executed. Thus, the STEP command enables the statement-by-statement 
execution of a BASIC program at the user’s discretion. 
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When a STEP command is entered, the BASIC data environment is not cleared, that is, data variables 
retain the values they had when the BASIC environment last stopped. 


Certain editing functions, such as deletion of the next statement to be executed, changing the dimen- 
sions of an array, or changing a FOR NEXT statement cause the STEP command to be disallowed 
until after a RUN or WALK command is entered. 

The STEP command has effect only when the BASIC environment is in a stopped state. 


The STEP command may be simulated by using the SPCFY key. Refer to SPCFY Key Use in this 
section. 


TEACH Command 


The TEACH command lists the syntax of a command on the user’s terminal. 


— “oe 
<command > 


<command> is any system or editing command contained in this section except pseudo BREAK. 


Syntax: 


G18095 


Semantics: 


The TEACH command causes a syntax diagram of the requested <command> to be displayed on 
the remote terminal. If no particular <command> is requested, a list of available commands is re- 
turned. 


Examples: 
TEACH 
TE XREF 
TEACH CONT 
TITLE Command 


The TITLE command gives a name to the current workfile. 


Syntax: 


TITLE <BASIC-file-name > HH 


G18096 
< BASIC-file-name> is described under Syntax Definitions in this section. 
Semantics: 


The TITLE command changes the name of the BASIC environment. The new name is used as the file 
name for a SAVE operation, unless explicitly overridden by the SAVE AS syntax. 
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Example of a TITLE command: 


TITLE !The current workfile is assigned 
THIS ! the name THIS. 


USER Command 


The USER command allows a user to log on. 


ee at iiaexat = #=#=#=2O=OCOC SF FOCOC*~S 
/ < 


password > 


Syntax: 


G18097 

Formation of <password> follows the same naming conventions as a <BASIC-file-name>. 
Semantics: 

The USER command is identical in function to the HELLO command, except that USER cannot be 
used for log off only. The intent of this command is to enable the SMCS auto log on feature, but 


its use is general. 


Example of a USER command: 


USER ME/ SECRET ! Logs off the current usercode, if 
! one exists, and logs on ME/ 
! SECRET. 


WALK Command 


The WALK command causes program execution to be initiated in a single-stepping fashion. 


Ot a 
<line-number > 


<line-number> is described under Statement Lines in Section 3. 


Syntax: 


G18098 
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Semantics: 

The WALK command initiates the execution of the BASIC environment, clearing the BASIC data envi- 
ronment, and causes execution to be halted after the first statement is executed. The statement executed 
is displayed on the remote terminal. The STEP or CONTINUE command may be used to continue 
program execution after this command. 


The presence of the optional <line-number> implies a GOTO <line-number> before execution be- 
gins. If <line-number> is invalid, a suitable message is returned. 


Examples of WALK commands: 


WALK ! Run the first executable statement 
!of the current workfile. 


WALK 1234 ! Run line 1234 as the first executable 
! statement of the current workfile. 


WHAT Command 
The WHAT command returns a statement that indicates the status of the current BASIC environment. 


Syntax: 


WHAT 


Example of WHAT command output: 


G18099 


YOU ARE (SOONER) AT 88, LSN=12 (TD832) 

THE TIME IS 14:55:33.2 AND THE DATE IS 80 AUG 30 
YOUR FILE IS CALLED "IBTEST” AND IS SAVED 
AND BEGINS AT LINE 10 AND ENDS AT LINE 230 


WHERE Command 
The WHERE command returns information about the execution of a program. 


Syntax: 


WHERE 
FROM 


CALLED 
G18100 
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Semantics: 


The WHERE command, with no options, returns a message that contains the next statement to be 
executed. 


If the FROM option is used, the last few (not more than 20) statements and commands executed are 
displayed. 


If the CALLED option is used, the last few (not more then 20) GOSUB and user-defined FN<x> 
calls are displayed. 


Examples of WHERE commands: 


WHERE 
WHERE FROM 
WHERE CALLED 


Example of WHERE FROM command output: 


last 20 statements executed :- 
90 IF A = B THEN 150 
100 IF A < B THEN 130 
110 LET A = A —- B 
120 GOTO 90 

90 IF A = B THEN 150 
100 IF A < B THEN 130 
110 LET A = A - B 
120 GOTO 90 

90 IF A = B THEN 150 
100 IF A < B THEN 130 
110 LET A = A - B 
120 GOTO 90 

90 IF A = B THEN 150 
100 IF A < B THEN 130 
110 LET A = A — B 
120 GOTO 90 

90 IF A = B THEN 150 
100 IF A < B THEN 130 
BREAK 

WHAT 

you are stopped — ready to continue at line 110 
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XREF or FIND Command 


The XREF and FIND commands are equivalent. To avoid confusion, XREF is used to refer to the 
command throughout this manual. The syntax and semantics of the XREF command follow. 


Syntax: 
XREF <variable-name > 
Tae <line-number > <line-number-range > 
<line-number-range > 
<user-defined-function > 
<delim > <string> <delim> 
G18101 


<variable-name> is any numeric or string variable. <line-number> is described under Statement 
Lines in Section 3. <line-number-range> is described under Syntax Definitions in this section. <user- 
defined-function> is any user-defined function as described in Section 8. <delim> is any non-alpha- 
betic character. <string> is any string of characters, excluding <delim>. 


Semantics: 
The XREF command displays the BASIC statements that reference the requested item(s). 


If a <line-number-range> is specified after a requested item, only that part of the BASIC program 
is searched. 


A request for a <variable-name> (A-Z9,A$-Z9$) looks for both scalar and array references that use 
the given name. 


A request for a <line-number> returns only the statements which reference that <line-number>. 
A request for a <line-number-range> returns references to items within that range inclusively. 


A request for a user FN name (FNA-FNZ9,FNA$-FNZ9$) returns the statements which call, define, 
or assign that name. 


A request for a delimited string initiates a search through the source statement(s) for occurrences of 
that string as a strictly literal string. 
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Examples of XREF statements: 


XREF A$ ! Lists those statement lines 
! which reference A$. 
XREF 100 ! Lists those statement lines 


which reference line 100. 


XREF 100-200 2000-3000 ! Lists those statement lines, 
! between lines 2000 and 3000, 
! which reference lines 100-200. 


XREF FNX 123-654 ! Lists those statement lines 
! between 123 and 654 which 
! reference FNX. 


XREF "X” 


a 


Lists those statement lines in 
which the character X 
occurs. 


— 


BASIC COMMANDS 


A BASIC command is similar to a BASIC statement in function, except that a BASIC command is 
executed immediately, is required to be re-entered completely if the user desires to have it executed 
again, and is entered without a preceding line number. 


Many of the BASIC statements described in Sections 3 through 10 of this manual can be used as BA- 
SIC commands but, by definition, some BASIC statements have no meaning unless properly accompa- 


nied by another statement or statements. A list of BASIC statements that are not allowed as commands 
follows. 


ON GOSUB 
OPTION 
User-defined function references 


BASIC commands which reference line numbers, for instance, GOTO and ON GOTO, simply change 
the next statement pointer (a memory location that contains the address of the next statement to be 
executed). Hence, if the BASIC environment is in a stopped state and a GOTO command is entered, 
a CONTINUE command causes execution to resume where the next statement pointer points, not nec- 
essarily where the environment was stopped. If the BASIC environment is running and a GOTO com- 
mand is entered, execution continues as if the BASIC GOTO command were the next statement. 
Hence, the flow of execution of the running program may be changed dynamically. 
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If the statement following a THEN or ELSE in an IF statement is disallowed in Command mode, then 
the whole IF statement is disallowed. 


Examples of BASIC commands: 


PRINT A;B;C 
BREAK 

LET A = 1 
PRINT A+B 
MAT A= B-C 
GOTO 500 


STOP AND END COMMANDS 


The STOP and END statements, when executed as commands, take on a special meaning. If a program 
is running or is stopped but able to be continued, the STOP or END command function as a STOP 
or END statement; that is, they terminate the execution of the current program such that continuation 
is prohibited. If a program is stopped, but not able to be continued (that is, a RUN or WALK state- 
ment must be used to cause a program to execute), then a STOP or END command terminates the 
current session by closing the printer backup file created by the PRINT option on the RUN, CONTIN- 
UE, and LIST commands. In this manner, a session begins at the first LIST PRINT, RUN PRINT, 
or CONTINUE PRINT and ends either when a STOP or END terminates it or when the user logs 
off. 


The printer backup file created has the current usercode as its family name. The file name contains 
the date and time of the session in the form YYMMDDHHMM, where YY represents the last two 
digits of the current year, MM represents the month number, DD represents the day number, HH rep- 
resents the hours using the 24-hour clock, and MM represents the minutes. 


BASIC STATEMENT ENTRY 


BASIC statements may be entered in any line number order. If a statement with a particular line num- 
ber is entered more than once, the last entered line is retained, and all previously entered lines with 
that line number are lost. 


The syntax of the statement is checked at the time of entry, and the line is retained even if there is 
a syntax error. Some BASIC statements rely on corresponding BASIC statements for complete correct- 
ness of syntax and function (for example, the FOR statement and the corresponding NEXT statement; 
the GOTO statement and the object of the GOTO). Any errors relating to this type of statement are 
detected and suitable error messages are emitted when any attempt is made to execute the program. 


Thus, there are two kinds of syntax error message. One is emitted at statement entry time and the 
other is emitted when an attempt is made to run the program. These kinds of error messages are not 
mutually exclusive, hence, they may appear interspersed as a result of an attempt to run a program. 
A BASIC statement may not exceed 256 characters in length. 

Examples of BASIC statements: 


10 PRINT A,B,C,D 
5000 LET A$ = "IN THE ” & A$ 
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RECOVERY 


The IBASIC system is able to recover the current user’s BASIC source program if the central system 
or the IBASIC system fails. At user log on time (HELLO time or at BOJ of IBASIC if auto log on 
is requested or at sign on time if the SMCSAUTOLOG initial parameter is specified) the IBASIC pro- 
gram checks the system for the presence of a workfile left over from a previous session. If this file 
is present, IBASIC automatically reloads itself with the contents of this workfile. Only BASIC source 
code is maintained in this file, so the values of data variables from the previous session are lost. 


If the recovery is not wanted, the workfile must be removed before log on, the recovered file must 
be scratched after log on, or a BREAK command must be entered during recovery. In order to remove 
the workfile before log on, it is necessary to determine the name of the workfile. 


If IBASIC was using the MCP usercode system, the workfile name is <default-pack-name>/ 
(<usercode>)/ WORKFILE<xx>. The expression <xx> is a unique pair of characters generated 
from the usercode index in the MCP usercode file. Refer to the Recovery feature in the B 1000 Systems 
CANDE Reference Manual, form number 1090586. 


If IBASIC was not using the MCP usercode system, the workfile name is called 
<usercode > /(WORKFILE). 


SPCFY KEY USE (TD820 AND TD830 TERMINALS ONLY) 


Depending on the state of the BASIC environment, the SPCFY key can be used as a shorthand way 
of typing a particular function. 


The SPCFY key can be used in all cases where the pseudo BREAK feature can be used. Refer to Pseu- 
do BREAK Feature in this section. 


The SPCFY key can also be used as a shorthand notation for the STEP command or for the BASIC 
BREAK command, according to the state of the BASIC environment. If the BASIC environment is 
in a stopped state, ready to continue execution from wherever it was halted, a depression of the SPCFY 
key will have the same effect as entering the STEP command. If the BASIC environment is running, 
the effect is the same as when the BASIC BREAK command is entered: the program is halted and 
can be continued from that point. 


To make sure that the SPCFY key does what is expected, it is suggested that the terminal be put in 
local mode by depressing the LOCAL key before depressing the SPCFY key. 


1152105 11-27 


i 


B 1000 Systems Interactive BASIC (IBASIC) Language Manual 


SECTION 12 
SPECIAL COMMANDS (‘DOT’ COMMANDS) 


Dot commands are special commands which are primarily intended for debugging the IBASIC system. 
These commands do not go through the normal process of compilation and execution. Their syntax 
is simple. 


General syntax: 


G18102 


BACKSPACE < new backspace char > 


BACKSPACE changes the character to be used as a backspace character for TTY type terminals only. 
By default, this character is a reverse solidus (\). 


CASE 


CASE enables or disables the use of lower-case letters in system responses. By default, lower-case is 
enabled for TD820 and TD830 terminal types and disabled for TTY and TD800 terminal types. 


CONTINUOUS 


CONTINUOUS changes the setting of continuous or wait mode for consecutive output messages. 
CANDE does not recognize the change and assumes that the mode is unchanged. Continuous mode 
means that the terminal is not switched to local mode after receiving a message. Wait mode means 
that the terminal is switched. 


DEBUG 


DEBUG sets or resets a debug toggle which enables various compiler trace and dump functions. 


DUMP 

DUMP causes a dumpfile of IBASIC to be created. 

‘FREEZE 

d FREEZE inhibits the MCP rollout process; thus, IBASIC is frozen in memory. 

_ FREEZE < 
_ FREEZE inhibits the MCP rollout process; thus, IBASIC is frozen in memory. 


HELLO 


HELLO returns the opening message. 
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HINTS <STRING> 


HINTS.prints the contents of a memory area called HINTS, which is useful in the analysis of the IBA- 
SIC system. This memory area contains the values of several variables pertinent to the system. If 
<string> is present, it is included in the heading of the printout. 


This command should be used if a problem is believed to exist. To initiate a dump to be sent to Bur- 
roughs for analysis, enter .DUMP HINTS. 


LOCAL 


LOCAL sets or resets a toggle which forces the remote terminal to be put in local mode after every 
command response. 


LOG 


LOG opens or closes a print file of all input and output messages. This command sets or resets a toggle 
accordingly. 


OL 


OL returns the data communication status of the remote station. 


OVERLAY 
OVERLAY returns the number of data and code overlays IBASIC has performed since BOJ. 


PROMPT 


PROMPT switches the form of the prompt for user input from a single "#” to the word “ready” as 
a prompt message and vice versa. 


RY 
RY, entered from the ODT, changes STATION(READY) to true. 


SS <STRING> 


SS displays <string> on either the remote terminal or the system console, the opposite of where the 
message originated. The RMSG system option must be set for system console messages to be displayed. 


ST 
ST changes STATION(READY) to false. 
STATUSLINE 


STATUSLINE switches on or off the maintenance of the TD830 status line. 


NOTE 
Firmware prior to the 2.0 release level in the TD830 does not implement the 
STATUSLINE feature, so STATUSLINE must be switched off by entering 
-STATUSLINE as the first message to IBASIC. 
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TIME 


TIME returns the elapsed time since the current user logged on and the total amount of cpu time accu- 
mulated this session. 


1152105 12-3 


e 


B 1000 Systems Interactive BASIC (IBASIC) Language Manual 


APPENDIX A 
GLOSSARY OF IBASIC TERMS 


active channel 
A channel that has a file assigned to it. 


alphanumeric 
An alphabetic or a numeric character. 


American Standard Code for Information Interchange (ASCII) 
The standard code, consisting of 7-bit code characters, used for information interchange among 
data processing systems. 


argument 
An expression used in a function reference to communicate data between the calling program unit 
and the function. 


arithmetic operator 
A symbol used in a numeric expression to indicate the arithmetic operation to be performed by 
IBASIC. 


array 
A group of string or numeric values stored under an array name and organized in columns, or 
in rows and columns. 


array element 
One element of an array. 


array name 
A symbolic name for an array. 


ASCII 
Refer to American Standard Code for Information Interchange. 


assign 
To give a variable a value through use of a READ, INPUT, LINPUT, or assignment statement. 


automatic log off 
The log off action that takes place when a remote terminal is prematurely disconnected from IBA- 
SIC. 


automatic log on 
The function of automatically logging a user on to IBASIC without a specific log on action for 
the specified usercode. 


BASIC 
Beginner’s All-Purpose Symbolic Instruction Code. 


BASIC command 
A BASIC statement used in Command mode. 


BASIC environment 
The set of BASIC code and data that are maintained in the workfile by IBASIC. 
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BASIC file name 
The name for an external file that can be specified within IBASIC. 


BASIC statement (also BASIC language statement) 
A group of BASIC keywords and expressions associated with a single line number. 


BASIC program 
A sequence of BASIC statements terminated by an END statement. 


branch 
Transfer to another line in a program other than the next line in sequence. 


break 


Temporary interruption in the execution of a program caused by the execution of a BREAK com- 
mand or statement. 


bridge 
A part of railroad syntax that specifies the number of times a path may or must be traversed. 


channel number 
A numeric expression which evaluates to an integer in the range 0 to 255. The channel number 
specifies the channel through which a file is accessed. 


character 
A letter, symbol, digit, or blank. 


clause 


Part of some BASIC statements. A clause starts with a key word such as STEP, ELSE, USING, 
or THEN. 


closed file 
A file that is not assigned a channel. 


column 
The dimension of an array which represents the vertical arrangement of elements of that array. 


columnar position 
The print position that is occupied by the next character transmitted to the current line; print posi- 
tions are numbered consecutively from the left, starting with position one. 


command 
Operating instruction to the system that is executed immediately when entered. 


Command AND Edit (CANDE) 
An editor program on the B 1000 systems. 


command mode 
The mode of interaction that is in effect when a command (no preceding line number) is entered. 


constant 
A nonvariable numeric or string value. 


continuous mode 
A type of message transmission that does not leave the terminal in local mode. 
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control statement 
A statement that can alter the sequence of execution for statement lines by causing the program 
to branch. 


control variable 
A simple numeric variable used in a FOR NEXT loop to count and control the number of 
iterations of the loop. 


conversational mode 
The “talking” mode in which IBASIC and a user interact. 


CRT terminal 
Display screen terminal, most likely a cathode ray tube. 


current line 
The string of characters (possibly zero) generated by PRINT and OUTPUT statements since the 
last end-of-line character was generated. 


current program 
The program that is currently loaded into the BASIC environment. 


data block 
List of constant values to be assigned to variables in a program through DATA and READ state- 
ments. 


datum 
One item in a logical group of data. 


debug 
To find and correct errors in a program. 


default 
An attribute or value which is automatically selected by the system when not specified by the user. 


default pack 
The pack associated with a specified usercode. 


delimit 
To separate items of data with a delimiter. 


delimiter 
A character that separates items of data. 


digit 
A graphic character that represents an integer, for example, one of the characters 0 to 9. 


dimension 
The size of an array. 


dot command 
A special IBASIC command preceded by a dot. 


dummy variable 
A variable used in the definition for a function that is defined in a program. When the function 
is used, the values listed as arguments are substituted for the dummy variables in the definition. 
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EBCDIC 
Refer to Extended Binary-Coded Decimal Interchange Code. 


end of line 
The end of the record, or the first occurrence of a NUL, CR, LF, or ETX character. 


end of record 
A NUL character or the physical end of the record. 


enter 
To submit information to the IBASIC system for processing by pressing the transmit key (XMT 
key on a TD830). 


entry mode 
The mode of interaction that is in effect when a BASIC statement is entered. 


error 
A mistake in BASIC syntax, program logic, or system operation. 


error number 
A number used by the system to identify an error. 


execute 
To perform the operation or task indicated by a statement, program, or command. IBASIC 
executes a program by executing individual statements in a prescribed order. 


explicit-point notation 
A method of representing a decimal number with decimal digits and a decimal point. 


expression 
A constant, variable, function reference, or combination of these separated by operators and used 
to represent numbers or strings. 


Extended Binary-Coded Decimal Interchange Code (EBCDIC) 
A character set, consisting of 8-bit coded characters, used for information interchange in data pro- 
cessing systems. 


fatal error 
A run-time error which halts execution. An error message is displayed to inform the user of the 
error. 


file name 
The name assigned to an external file. 


file pointer 
An indicator of the position in a file that is affected by the next file input or output statement. 


floating-point notation 
A method of representing a real number. For example, 0.0001234 is 0.1234E-3, where 0.1234 is 
the fractional part and E-3 is the exponent. 


forms mode 
A format function, available on some remote terminals, which is used to send page information 
from the central system to the keyboard operator for the purpose of entering data in a particular 
format. 
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function 
An algorithm for making a calculation which yields a single value. Functions for some common 
calculations are provided by IBASIC. Other functions can be defined in programs with DEF state- 
ments. 


function name 
A symbolic name used to identify a function. 


global variable 
A variable which can be referenced from anywhere within a program. 


IBASIC 
Refer to Interactive BASIC system. 


image 
The format according to which one or more data items are to be printed. 


implicit-point notation 
A method of representing a decimal number that contains only decimal digits. The decimal point 
is assumed to occur to the right of the rightmost digit of the number. 


inactive channel 
A channel with no file assigned to it. 


index 


A numeric expression which evaluates to an integer and identifies the position of an item of data 
with respect to some other item of data. 


input 
Data supplied for processing through external media. 


integer 
A whole number that can be represented exactly, using only decimal digits. 


interaction 
The conversational dialogue that takes place between the user and the computer. 


Interactive BASIC system 


The compiler, interpreter, message control system (MCS), editor, external intrinsics, and dummy 
program that comprise IBASIC. 


interactive command 
An instruction to IBASIC. 


intrinsic numeric function 


A predefined function supplied as part of IBASIC for the evaluation of commonly used numeric 
functions. 


intrinsic string function 
A predefined function supplied as part of IBASIC for the evaluation of commonly used string- 
valued functions and numeric-valued functions whose arguments are strings. 

jump 
Refer to branch. 
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justifier 
A greater than (>) or less than (<) sign, occurring in an image, which specifies right or left justi- 
fication, respectively. 


keyword 
A character string which provides a distinctive identification of a statement or a component of 
a statement. 


letter 
An English alphabet character: A through Z or a through z. 


line number 
A number used to sequence a statement line. It may contain up to five decimal digits. 


line number range 
A syntactic construction that allows a sequential group of line numbers to be specified. 


local variable 
A variable that is only understood in a user-defined function. Parameters are the only variables 
that fall into this class. 


loop 
A sequence of statements in a program that are executed repeatedly; a repeating path in a railroad 
syntax diagram. 


margin 
The number of characters, excluding the end-of-line character, that can be written on one output 
line. 


matrix 
A 2-dimensional array. 


MCP file name 
A name for an external file that is valid to the MCP. 


MCS 
Refer to message control system. 


memory 
A place where the system can temporarily store programs and data during processing. 


message control system (MCS) 
A program which opens a remote file with the HEADERS option and thereby controls the stations 
in that remote file. 


NDL 
Refer to Network Definition Language. 


nest 
To imbed a language structure within itself. 


Network Controller 
The program generated through compilation of a Network Definition Language source program. 
The Network Controller handles the line discipline for the data communication devices of a system 
and the interface queue between an MCS and the operating system. 
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Network Definition Language 
A descriptive free-form language for defining and implementing a data communications network. 
The NDL compiler analyzes the input statements and generates a network controller. 


next statement pointer 
A memory location that contains the address of the next statement to be executed. 


nonfatal error 
A run-time error that does not halt execution of the BASIC program. An error message is dis- 
played to inform the user of the error. 


null string 
A string value containing no characters, represented in BASIC by ””. 


numeric constant 
A series of decimal digits, occurring with a BASIC program, that denote a numeric value. 


numeric expression 
A numeric constant, numeric variable, numeric function reference, or a combination of these 
separated by arithmetic operators. 


numeric function reference 
An intrinsic numeric function or a user-defined numeric function. 


numeric overflow 
A condition that occurs when a numeric value exceeds the maximum numeric value allowed. 


numeric variable 


A symbolic name used to represent a numeric value which may be changed during program execu- 
tion. 


object of a loop 
An item within a loop of a railroad syntax diagram. 


open file 
A file that is assigned to a channel. 


operand 
A numeric or string expression used as part of a larger numeric or string expression. 


operator 


The symbol used in a numeric, string, or relational expression to indicate the operation to be per- 
formed by IBASIC in order to find the value of the expression. 


optional item 
An item in a railroad syntax diagram that may be omitted. 


order of operations 
The standard sequence in which IBASIC performs operations to find the values of expressions. 


ordinal position 
The position of a character in either of the character sets used in BASIC (ASCII or EBCDIC). 


output 
The results of a program, written to external media. 
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overflow 
Refer to numeric overflow and/or string overflow. 


parameter . 
A simple variable used in a function to pass data between the calling routine and the function. 


password 
A word associated with a usercode that allows access to IBASIC. 


path 
The sequence of execution for statements in a program. 


print item 
An expression or a TAB call occurring in a PRINT or OUTPUT statement. 


print line 
A transmission of characters, from PRINT and/or OUTPUT statements, which terminates with 
an end-of-line character. 


print zone 
A contiguous set of 15 character positions in an output line which may contain an evaluated 
PRINT or OUTPUT statement expression. 


privileged status 
The status that the IBASIC system has if it is executed under a privileged MCP-type usercode or 
a non-MCP usercode. Privileged status affects the types of files that may be accessed. 


program 
A sequence of instructions for doing a task on a computer. 


program designator 
A string expression whose value specifies the name of a program to which chaining is to be per- 
formed. 


prompt 
A message displayed to signal the user to enter input. 


quoted string character 
Any character in Table E-1 in Appendix E, except those characters in ordinal positions 0 through 
31, 34, 64, 91, 92, 96, and 123 through 127. Ordinal position 34, the quotation mark (”), may 
appear as a quoted string character if it is represented by two adjacent quotation marks. 


real number 
Decimal number containing a decimal point. 


record length 
The number of characters between the beginning of a record and the end of the record. 


redimension 
To change the bounds of an existing array. 


relational expression 
An expression containing a relational operator and having the value of true or false. Relational 
expressions are used only in IF statements to cause the program to take one path if the expression 
is true and another path if the expression is false. 
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relational operator 
Symbol used in an expression to define a comparison to be made between two numbers or strings. 


remark string 
A string of characters occurring in either a tail comment or a REM statement. 


required item 
An item in a railroad syntax diagram that may not be omitted. 


reverse video 
A method of highlighting a line on a display screen terminal. 


row 
The dimension of an array which represents the horizontal arrangement of elements of that array. 


run-time 
Occurring during program execution. 


scalar 
A quantity characterized by a single numeric or string value. 


scaled notation 
A method of representing a number by using a real number raised to a power of 10. 


scope of file access 
A particular BASIC environment may access, for input only, any disk file maintained by MCPII 
which may be accessed under the currently logged on usercode. The BASIC environment may only 
create or change a file which has the family name of the currently logged on usercode. Thus, the 
rules for forming a file name, which is for input only, are more flexible than those for files 
which are to be created. 


sign 
A plus (+) or minus (-) sign. 


simple variable 
A variable that is not subscripted. 


single stepping : 
A method of executing a BASIC program in which each BASIC statement is performed in response 
to a single manual operation. 


SMCS 
Refer to Supervisory Message Control System. 


source code 
BASIC language statements. 


source line 
A line of source code. 


statement 
An instruction in a BASIC program occurring on one statement line. 


statement line 
A line number followed by a BASIC statement. 
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string 
A series of consecutive characters treated as a group. 


string constant 
A string of characters enclosed within quotation marks ("). 


string expression 
A string constant, string variable, string function reference, or a concatenation of these. 


string function reference 
An intrinsic string function or a user-defined string function. 


string length 
The number of characters represented by a String. 


string overflow 
A condition occurring when a string variable is assigned more characters than its length allows. 


string variable 
A symbolic name used to represent a string value which may be changed during program execu- 
tion. 


subscript 
An index into a row or a column of an array. A 1-dimensional array has one subscript and a 
2-dimensional array has two subscripts. 


subscripted variable 
A variable with one or two subscripts. 


Supervisory Message Control System (SMCS) 
The standard message control system available on the B 1000 systems. 


symbolic name 
A symbol or symbols used to represent a numeric or string variable. 


syntax error 
An error in the syntax of a command or statement. 


system command 
See command. 


underflow 
A condition that occurs when an attempt is made to represent a numeric value smaller than the 
smallest value representable in BASIC. 


unscaled notation 
Notation for a number characterized by the absence of an exponent part as occurs in scaled nota- 
tion. 


usercode 
A name assigned to a user and used for file security. 


user-defined function 
A function defined by a user with a DEF statement. 
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user session 
The period of time during which a user is logged on. 


value 
A number or a string represented by a constant, variable, or expression. 


variable 
A data name within a program whose value can be changed. 


vector 
A 1-dimensional array. 


wait mode 
A type of message transmission that leaves the terminal in local mode. 


workfile 


The temporary file that IBASIC uses to store user-entered BASIC statements. 


zoned format 
Design for output that allocates 15 character positions for each value. 
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EXECUTION UNDER SMCS 


IBASIC can be initiated by using either the EXECUTE program control instruction or by using the 
SIGN ON command of SMCS. 


The signal character for IBASIC cannot be the pound sign character (#), the period character (.), or 
SUB (refer to table E-1 in appendix E). 


The current IBASIC session can be terminated by using the SIGN OFF command of SMCS. However, 
if the SIGN OFF command is used during an IBASIC session initiated with the NO EOJONLOGOUT 
parameter (refer to Initial Parameters in appendix C), the IBASIC program does not go to EOJ. In 
this case, the SMCS program allows the same station to initiate another IBASIC session using the 
SIGN ON command without causing another BOJ. If the SIGN OFF CLEAR command is used to 
terminate an IBASIC session initiated with the NO EOJONLOGOUT parameter, the IBASIC program 
remains available to any station using the SIGN ON command without causing another BOJ. 


Termination of an IBASIC job occurs if a message is sent to the IBASIC program by way of the SMCS 
PASS mechanism. 


USING THE EXECUTE PROGRAM CONTROL INSTRUCTION 


The IBASIC program can be initiated using the EXECUTE program control instruction. In this case, 
no entry is required in the SMCS jobs file. An accept (AX) message can be used at the beginning of 
the IBASIC program execution to set the initial parameters for the the IBASIC environment. This will 
be referred to as an early accept message in the following sections. These parameters are described un- 
der Initial Parameters in appendix C. 


If the terminal is logged on under an MCP usercode, the IBASIC program is executed under that user- 
code and the normal usercode considerations apply. If automatic log-on is required and the logged on 
usercode is privileged, the AUTOLOG parameter must be specified in the early accept message. 


USING THE SIGN ON COMMAND 


IBASIC can be initiated using the SIGN ON command of SMCS (for example, ON IBASIC). This 
requires one of two possible entries in the SMCS jobs file: (1) one which causes an EOJ when the 
user signs off, and (2) one which does not cause an EOJ when the user signs off. 


The following entry in the SMCS jobs file causes an automatic log-on and causes an EOJ when the 
user signs off. 


column | $ 
column 2. IBASIC LOG-ON NO-SESSION ; 
EX IBASIC 
ME <user site default > 
PR <user site default > 
AX SMCSAUTOLOG <plus any other parameters 
listed under Initial Parameters in 
Appendix C> 
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The following entry in the SMCS jobs file causes an automatic log-on and does not cause the IBASIC 
program to go to EOJ when the user signs off. The user is logged off and the user station is detached 
from the IBASIC program. The IBASIC program waits in the mix for another user to sign on. If a 
user is not logged on, the IBASIC program goes to EOJ upon receiving a BYE or SIGN OFF com- 
mand. 


column 1 $ 
column 2. JBASIC NO-EOF <optional wait limit > 
LOG-ON EXCEPT NO-SESSION; 
EXECUTE IBASIC; 
MEMORY <user site default >; 
PRIORITY <user site default>; 
AX SMCSAUTOLOG NO EOJONLOGOUT <plus any 
other parameters listed under Initial 
Parameters in appendix C> 


If a limit is desired on the time the IBASIC program waits in the mix with no user, a wait limit can 
be placed in <optional wait limit>. This field has the following form. 


<OPTIONAL WAIT LIMIT> SYNTAX: 


eames: | < seconds > ) 
<_ hours> : 


<hours>, <minutes>, and <seconds> are integers. For example, (2:30) specifies a limit of 150 sec- 
onds. 


EXECUTION UNDER CANDE 


The IBASIC program can be initiated through CANDE under the usercode which is logged on to 
CANDE by using the EXECUTE command. If automatic log-on to this usercode is required, the early 
accept message must include the AUTOLOG parameter (refer to Initial Parameters in appendix C). 


Example: 


EXECUTE *IBASIC;<optional ME parameter>; AX AUTOLOG 


NOTE 
If IBASIC does a display to the ODT (for instance, as a result of a .SS com- 
mand), the display messages are repeated at the remote terminal and are dis- 
played only at the ODT if the RMSG system option is set. 


EXECUTION WITH NO MCS 


If no MCS is present, the IBASIC program must be executed from the ODT with the initial parameter 
of ODT__MODE included in the early accept message (refer to Initial Parameters in appendix C). If 
automatic log-on to the usercode under which the JBASIC program is executed is desired, the early 
accept message must also include the AUTOLOG parameter. If other than the default memory is re- 
quired, a memory clause must be added to the control string. 
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Example: 
USER ME/MINE EXECUTE IBASIC; MEMORY 400000; AX ODT_.MODE AUTOLOG 
AUTOMATIC LOG-OFF 


If the remote terminal is prematurely disconnected from IBASIC before a proper log-off (BYE or 
HELLO command) occurs, an automatic log-off occurs regardless of the state of the BASIC environ- 
ment. The remote user must re-establish connection and log on to IBASIC again in the normal manner. 
The source file that was loaded at the time of the log-off can be recovered, but any data values are 
lost. 


The TERMINATE ERROR mechanism in the network controller implements this feature. Thus, if 
IBASIC receives a TERMINATE ERROR message from the remote terminal with one or more of the 
relevant error conditions true, a log-off procedure is initiated. The following data communication er- 
rors are relevant: 


TIMEOUT 

LOSS OF DSR 

LOSS OF CARRIER 
ADDRESS ERROR 
TRANSLATE ERROR 
FORMAT ERROR 
READ NOT READY 


The same procedure is invoked if the SMCS sign OFF command is used before proper log off proce- 
dures occur. 


It is strongly recommended that the remote user log off IBASIC in the proper manner if conditions 
allow. 


RUN-TIME LIMIT 


The amount of Central Processing Unit (CPU) time that a user session can consume without interrup- 
tion can be specified. If no limit is specified (the default situation), a user session can continue indefini- 
tely. If a limit is specified, a program is temporarily suspended if that limit is exceeded during the 
session. Program execution can be continued in the normal fashion after this interruption until the limit 
is reached again. This feature provides a way to stop a program from consuming vast amounts of CPU 
time if the program is in a loop and is running unattended. 


The RUNLIMIT parameter of the early accept message specifies the run-time limit in minutes (refer 
to Initial Parameters in appendix C). For example, if the IBASIC program is executed with an initial 
parameter of RUNLIMIT 2, then every time two minutes of CPU time is used for program execution, 
the user session is interrupted and the user must do something positive, for example, enter a CONTIN- 
UE command to continue the session. If the RUNLIMIT parameter has a value of zero, the user ses- 
sion is unlimited. 
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NETWORK CONTROLLER CONSIDERATIONS 


There are some constraints on the generation of the Network Controller. The Interactive BASIC system 
assumes the validity of the TYPE field specified in the TERMINAL Section of the NDL source. Cur- 
rently, only the following values for the TYPE field are valid: 


Type Terminal 


0 B9350 (TTY) 
26 TC4000 
4] TD801 
42 TD802 
43 TD821 
44 TD822 
45 TD831 
46 TD832 


Scrolling of input and output lines is supported only for TD820 and TD830 type terminals. To enable 
scrolling, the standard CANDE request and control sets must be used. 


For correct operation of TTY type terminals, the CANDE IOTTY request set must be used. 

The following considerations are only relevant if nonstandard request and control sets are used. A 
knowledge of NDL coding and the use of station TOG and TALLY values is assumed. The special 
meanings for the following values are assumed. 


When TOG[1] is set on an output message, it means that this message is not to be scrolled. 


A true value in station TOG[2] in an input message means that the input message was scrolled or that 
the output message is to be scrolled. 


Station TOG[3] is set for all output messages to a teletype, and associated TOG[7] can be set to indi- 
cate inhibition of transmission of trailing CR and LF characters for this message. 


Station TOG[3] is also set for all messages that are to be scrolled. This method is used to enable multi- 
ple line output scrolling which is in the CANDE request sets. 


A true value in station TOG[5] means that BREAK was detected in the last output attempt. This must 
only be true in a 'GOOD RESULTS REPLY’ type message. 


If station TALLY[0] = 2, a screen type terminal is forced to local after this output message (even 
in scroll mode). 
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INTERACTIVE BASIC SYSTEM CONSIDERATIONS 


Modifications to the IBASIC environment can be made to suit the individual user. These modifications 
may be applied through MODIFY MCP syntax or as parameters with the EXECUTE program control 
instruction. 


There is one copy of the IBASIC program for each user of the system. Thus, the following 
considerations may be applied differently to each user, or globally to all users as required. 


INITIAL PARAMETERS 


An early accept message can be used to supply a set of initial parameters which help determine the 
IBASIC environment. The early accept message is specified with the EXECUTE program control in- 
struction. All of the desired parameters must be supplied in a single accept message. 


Syntax: 


EXECUTE IBASIC; AX AUTOLOG 
CONTINUOUS 
EOJONLOGOUT 
LOWERCASE 
ODT 

RUNNER 
SMCSAUTOLOG 


USERCODES 


BACKSPACE <ccharacter > 
DEBUGTYPE DEBUG 
LOG 
WW 


Qc 


ee ieee | 
WORKFILEAREAS < integer > 


Restrictions: 

The SMCSAUTOLOG and AUTOLOG parameters cannot both be set. 

The SMCSAUTOLOG and ODT parameters cannot both be set. 

The NO EOJONLOGOUT parameter requires that the SMCSAUTOLOG parameter be set. 


Table C-1 contains descriptions of the parameters and arguments shown in the early accept message 
of the EXECUTE program control instruction. 
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Table C-1. Early Accept Parameters and Arguments 


Valid 
Parameter Arguments 
AUTOLOG none 
BACKSPACE < character > 
CONTINUOUS none 
DEBUGTYPE DEBUG 
LOG 
WW 
QC 
EOJONLOGOUT none 
LOWERCASE none 
NO none 
ODT none 
RUNLIMIT < integer > 
RUNNER none 
SMCSAUTOLOG none 
USERCODES none 


WORKFILEAREAS < integer > 
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Default 
Setting 
FALSE 


heNoe 


FALSE 
none 


none 


none 


none 


TRUE 


TRUE 


Description 


Refer to Execution Under 
SMCS in appendix B. 


Changes the character used 
as a backspace character 
for TTY-type terminals. 


Causes page pauses on 
terminal output. 


Sets a debug option 
within the compiler. 


Initiates printer log of 
the input and output oper- 
ations of a remote user. 


Same effect as SWITCH = W 


Sends all terminal output 
messages to the remote 

file that approved the 

open for IBASIC. The 
message type is set to SO 

to indicate that the 

message is from IBASIC and 
not the remote station. 


Refer to Execution Under 
SMCS in appendix B. 


Specifies the type case 
output. 


The NO keyword resets the 
parameter that immediately 
follows it. 


Refer to ODT Operation 
in this appendix. 


CPU run-time limit in 
minutes. Zero means no 
limit. 

Enables calls to the 
microinterpreter. 


Refer to Execution Under 
SMCS in appendix B. 


Indicates whether or not 
operation is under MCP 
usercode/password security 


Number of areas in the 
source workfile. Each area 
can contain 400 statements. 
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DYNAMIC MEMORY 


IBASIC relies heavily on SDL paged array structures. Both s-code and data are maintained in paged 
arrays; therefore, if the average BASIC program has many statements or uses large amounts of data, 
IBASIC may require a larger dynamic memory size. Dynamic memory size can be changed only at BOJ 
time of IBASIC, so either an ME control parameter can be included in the execute command or a 
particular installation can modify a default value to suit its particular median requirements. Use of 
the .OVERLAY dot command may help in determining the need for more memory. 


HARDWARE REQUIREMENTS 


The Interactive BASIC system requires the following minimum hardware: 


B 1000 processor 

128K bytes (dependent on number of users) 
1MB disk per user 

TD&8&20, TD830, TC4000, TTY type terminals 


ODT OPERATION 


If no remote operation is required (that is, if no data communication system exists or is needed), IBA- 
SIC can be operated from the system console. To do this, the IBASIC program must be initiated with 
the EXECUTE program control instruction and must be given an early accept message specifying the 
ODT parameter (refer to Initial Parameters in this appendix). The ensuing log-on process is identical 
to the normal remote log-on process according to the usercode (if any) under which the IBASIC pro- 
gram is logged on. There is no implied limit to the number of users who can use the ODT. Further 
communication with the IBASIC program is achieved through normal accept messages. 


PRIORITY 


For quick servicing of a request from a user station, the IBASIC program must be run at a priority 
(both memory and processor) higher than any batch jobs, as is the case for most remote applications. 


SOFTWARE REQUIREMENTS 


The Interactive BASIC system requires the following software. 


IBASIC (compiler) 
IBASIC/INTERP (interpreter) 
IBASIC/INTRINSICS (intrinsics) 


MCPII (Systems software release 9.0 or later) 
NDL (Systems software release 9.0 or later) 
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SWITCH VALUES 


The following switch value is allowed for debugging purposes. 


SW = W 
Enables extensions to the ANSI language as explained in appendix F, and forces auto log-on. 


USERCODE CONSIDERATIONS 


The user has a choice of whether or not to run the IBASIC program under the B 1000 file security 
system. 


If IBASIC is not executed under the B 1000 file security system, the scope of access of the BASIC 
environment is limited to public files. In this case, the NO USERCODES parameter must be specified 
in the early accept message (refer to Initial Parameters in this appendix). In this mode, the concept 
of a password does not exist: a logged on usercode is simply a default family name of a file accessed 
for input only; and is also a mandatory family name for a file to be created or changed. 


If the IBASIC program is executed under a nonprivileged MCP usercode, it automatically logs on that 
usercode. Log-on of another usercode is disallowed. The IBASIC program must be logged off and re- 
executed under a different usercode to effect a change of user. 


If the IBASIC program is executed under a privileged MCP usercode, automatic log-on to the execu- 
tion usercode depends on the value of the AUTOLOG parameter. If automatic log-on is not requested, 
the IBASIC program requests an explicit log-on from the user before continuing. The usercode and 
password must be defined in the usercode file. Regardless of the value of the AUTOLOG parameter, 
another user can log on after the current user has logged off without the IBASIC program going to 
end of job (EOJ). 


WORKFILE CONSIDERATIONS 


The IBASIC workfile allows up to 1979 BASIC statements in a program by default. This limit (and 
the disk space required for the IBASIC user) can be modified by using the WORKFILEAREAS param- 
eter in an early accept message (refer to Initial Parameters in this appendix). The default value of this 
parameter is 5 areas and each area can contain 400 statements. The value specified by the WORKFI- 
LEAREAS parameter can be used to increase or decrease the default value. The parameter only affects 
the creation of a new workfile. If a recovery workfile is used, the maximum size is determined by the 
size of the recovery workfile alone. 
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APPENDIX D 
SYNTAX SUMMARY 


ABS FUNCTION 


ABS ( <numeric-expression > ) SS 


G18103 


ACOS FUNCTION | 
ACOS ( <numeric-expression > ) | 


G18104 
ANGLE FUNCTION 
ANGLE ( <numeric-expression > , <numeric-expression > ) —_— —-__-+___________] 


G18105 
ASIN FUNCTION 
ASIN ( <numeric-expression > ) $$$ 


G18106 
ATN FUNCTION 


ATN ( <numeric-expression > }— 


G18107 
-BACKSPACE COMMAND 
.BACKSPACE <new backspace char > | 


G18108 


BASIC FILE NAME 
Sea Dret: 510) Serene 


<alphanumeric > 


ee 
“ <character > » 
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BREAK STATEMENT 
BREAK 


G18071 
. BRK COMMAND, BRK 
.BRK $$ 


G18088 
BYE STATEMENT 
BYE en 


G18077 
-CASE COMMAND 
. CASE >] 


G18109 
CEIL FUNCTION 
CEIL ( <numeric-expression > ) oo ___] 


G18110 


CHAIN STATEMENT 
CHAIN <program-designator > —_dH_!——+- >> 
CHR$ FUNCTION 

CHR$ ( <numeric-expression > ) ad 
G18111 


CLOSE STATEMENT 
CLOSE # <channel-number > — A S$ 
G18063 


CONTINUE COMMAND 


CONTINUE a Laer eer eee rere 


G18044 


G18078 
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CONTINUOUS COMMAND 
_CONTINUOUS — ee 


G18112 
COS FUNCTION 
COS ( <numeric-expression > ) a 


G18113 


COSH FUNCTION 


COSH ( <numeric-expression >) A J 


G18114 
COT FUNCTION 
COT ( <numeric-expression > ) 3 


G18115 
CSC FUNCTION 
CSC ( <numeric-expression > ) a 


G18116 


DATA STATEMENT 


DATE FUNCTION 
DATE $$ __§__ 


G18046 


G18117 


DATE$ FUNCTION 
DATES $i 


G18118 


DEBUG STATEMENT 


DEBUG ae ON — ] SS 
G18070 on, 
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.EBUG COMMAND 
. DEBUG oo 


6 i? 
A omen o = 


DEF —FN <letter > ie reaen “TT $ TT parame TL <expression > i: 


G18119 


DEF STATEMENT 


G18120 


DEG FUNCTION 


DEG ( <numeric-expression > ) ——_ 


G18121 


DELETE COMMAND 


oa . — 
<line-number > 


G18079 


DET FUNCTION 


—— DET TE ( —— <array-name> —— ) 7 


DIM STATEMENT 


DIM 


<array-name > ( <row> a , eee ) 


~ <string-variable > * <integer > 


G18122 


DO STATEMENT 


DO SS 
- WHILE asl <relational-expression> _ | 
UNTIL 
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DOT FUNCTION 
DOT ( <larray-name > + <array-name > ) $$ 


G18024 


.DUMP COMMAND 
UMP __- 


G18123 


EDIT COMMAND 


—— EDIT 
ERRORS < line-number > 
FROM 


END STATEMENT 
END a Se 


G18004 
EPS FUNCTION 
EPS a 


G18124 


EXCEPTION STATEMENT 
AT EOF 4 <channel-number > THEN <line-number > — A$ 


G18067 
EXIT STATEMENT 


EXIT IF < relationalee xpression > $$$ iii 
EXP FUNCTION 


EXP € <numeric-expression > ) —_——— 


G18125 


FILE COMMAND 


FILE < MCP-file-name > ON < pack-name > 
= tilename > / = 
G18080 
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FIX COMMAND 


FIX 1 ea <delim > <text > <delim > <new-text > 5 ae ik 
<line-number-range > <delim > 


G18081 

FNEND STATEMENT 

im ene. 7 ae 
END DEF 

G18042 


FOR STATEMENT 


FOR <control-var > = <initial-value > TO <Iimit > = STEP <Cincrement > 
G18037 


FP FUNCTION 
FP ( <numeric-expression > ) Neen aan 


G18126 


-FREEZE COMMAND 
FREEZE el 


G18127 


GET COMMAND 


GET <(MCP-file-name > ne —____—_————_ 
ON <pack-name > _ 


G18082 


GOSUB STATEMENT 


GOSUB < line-number > i 


G18033 


GOTO STATEMENT 


GOTO <line-number > Ss 


G18032 
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HELLO COMMAND 


HELLO 


<usercode > 
/ = < password > 


G18083 


HELLO COMMAND 


HELLO —————_—_ —______—_§ 


G18128 


-HINTS COMMAND 


HINTS <string> —— —— 


G18129 


IF STATEMENT 


IF <rel-exp > THEN i acai > 


ELSE <line-no2 > 
— <stmt1 > | < stmt2 > 


'G18039 


IF STRUCTURE (BLOCK) 


crt <n conan Ls 


IMAGE STATEMENT 


<f-format > 
<e-format > 


iE IMAGE alse : <literal-string > <justitier > IP <i-format > a <literal-string > 


G18055 
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INF FUNCTION 


INF | 


G18130 


INPUT REPLY 


ie 


INPUT PROMPT <string-expression > ‘ < variable > +—- onan | 
- <channel-number > : — ; 


G18131 


INPUT STATEMENT 


INPUT PROMPT <string-expression > : ae < variable > pipes trite 
=! <channel-number > : ——~ , 


G18131 


INQUIRE STATEMENT 


~—— INQUIRE ——#—— <channel-number> —— :-——~> 


1 > 
ACCESS < string-variable> ai 


FILE TYPE 
NAME 
ORGANIZATION 
RECORD LENGTH 
RECORD TYPE 
STATUS 


INT FUNCTION 


INT (€ <numeric-expression > ) ————-—----_ | 
G18132 


IP FUNCTION 


IP ( <numeric-expression > ) —————_____—_ ——__———— 


G18133 
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LDIM FUNCTION 


LDIM ( <array-name > + <numeric-expression > ) 


G18134 


LEN FUNCTION 


LEN ( <string-expression > ) 


G18135 


LINE NUMBER 


4 
<digit > 


G18136 


LINE NUMBER RANGE 


< 
saa al line-number1 > 
t—— FIRST < minus > oo <line-number2 > 


LAST 


4 


os (ea LAST ————— 
ES AL _ 
G18073 


LINPUT REPLY 


G18052 


LINPUT STATEMENT 


iar ieeeeiae PROMPT < string-expression > : <string-variable > —————————_] 
LINE INPUT # <channel-number > ° 


G18051 


LIST COMMAND 


Cas ca °° 
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.LOCAL COMMAND 
. LOCAL —— — SS 


G18138 
LOG FUNCTION 


LOG ( <numeric-expression > pe 
G18139 


LOG COMMAND 


.LOG i _ 


LOG10 FUNCTION 


LOG10 ( <numeric-expression > y) 


LOG2 FUNCTION 


LOG2 ( <numeric-expression > ) 


LOOP STATEMENT 


LOOP 


G18140 


G18141 


G18142 


WHILE ae < relational-expression > 
UNTIL 


MAKE COMMAND 


MAKE <BASIC-file-name > ,!_,_,__ ++ YY 


G18085 


MARGIN STATEMENT 


MARGIN <margin-value > 2 


MAT ADDITION STATEMENT 


MAT <array-namel > = < array-name2 > + < array-name3 > a 


G18059 


G18021 
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MAT ASSIGNMENT STATEMENT 
MAT < array-name1 > = < array-name2 > a ee 


G18022 


MAT CON STATEMENT 


MAT < array-name > = ( < numeric-expression > ) * 
( < subscript > ie > < subscript aa ) 


CON 


G18023 


MAT IDN STATEMENT 


MAT < array-name > = a ic < numericexpression > ) * r = 


(DN mi ( < subscript > ce (a * < subscript > a 


G18025 


MAT INPUT STATEMENT 


—— MAT INPUT PROMPT < string-expression> : 
# <channel-number > : 


(< subscript> > < subscript > ) 


< array-name> 


< array-name> (7) 


MAT INV FUNCTION 


—— MAT —— <array-name1> —— = —— INV —— (< array-name2>) — 


MAT MULTIPLICATION STATEMENT 


MAT <array-namel > = < array-name2 > * < array-name3 > SSS 


G18026 
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MAT NULS$ STATEMENT 


MAT <array-name > = NULS ( < subscript i > < subscript > T i — 
G18030 


MAT OUTPUT STATEMENT 


—— MAT OUTPUT #< channel-number>: pe 


array-name> 


MAT PRINT STATEMENT 


MAT PRINT - See ae eee 
| 


mi OS 
eae 


MAT READ STATEMENT 


MAT READ ao omen > 


( <subscript > ia > <subscript > c. ) 


G18060 


MAT SCALAR MULTIPLICATION STATEMENT 


MAT <array-name > = aaa ( << numeric-expression > ) * <array-name > —— 


G18027 


MAT SUBTRACTION STATEMENT 


MAT < array-namel > = < array-name2 > < minus-sign > < array-name3 > — 
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MAT TRN FUNCTION 
—— MAT —— < array-name1 > —— = —— TRN —— (< array-name2>) — 


MAT ZER STATEMENT 


MAT <array-name > = ( <numeric-expression > ) * 
ee ohne ee 


G18029 


MAX FUNCTION 


MAX ( <numeric-expression > > <numeric-expression > ) — 


G18143 


MCP FILE NAME 


<BASIC-file-name > 
* <BASIC-file-name > 


/ <BASIC-file-name > 


( <BASIC-file-name > ) 
* ( <BASIC-file-name > ) 
G18076 


MERGE COMMAND 


MERGE <MCP-file-name > Td 
a <line-number-range > —-— ON <pack-name > 
: FROM 


MIN FUNCTION 
MIN ( <(numeric-expression > » <numeric-expression > ) —  ——_ 


G18086 


G18144 


MOD FUNCTION 


MOD ( <numeric-expression > >» <numeric-expression > ) a 


G18145 
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MULTIPLE-STATEMENT FUNCTION ASSIGNMENT STATEMENT 


al <tunction-name > = <expression > ee 


G 18043 


NEXT STATEMENT 
NEXT <control-var > a  ____] 


G18038 


NUMERIC ASSIGNMENT STATEMENT 


LET < sneer ele = < numeric-expression > —_— 
G18007 


NUMERIC CONSTANT 


< sign > 


< integer > < integer > 


- < integer > 
G18005 


NUMERIC EXPRESSION 


< operator > 


< numeric-constant a eee 


< numeric-variable > ——— 


- < numeric-function-ref > — 


( < numeric-expression > ) 


G18008 


NUMERIC VARIABLE 


< letter > i ibaa > i ( < subscript > 7 » <subscript > TT 


es 


G18006 
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OL COMMAND 


G18146 


ON GOSUB STATEMENT 


G18036 


ON GOTO STATEMENT 


i < line-number > ELSE < statement > 


G18035 


OPEN STATEMENT 


OPEN # <cchannel-number > : <file-name > 


G18062 


ON < index > GOTO 


OPTION STATEMENT 


OPTION 


G18147 
1152105 


COLLATE i. 


NATIVE 
STANDARD 


INPUT 
OUTPUT — 
OUTIN 


SEQUENTIAL 
DISPLAY 


INTERNAL 
BEGIN 
END | 


VARIABLE <index > 


.OL ee 


ON <index > GOSUB £ <line-number > ELSE <statement > 
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ORD FUNCTION 


ORD ( <string-expression > } $a 


OUTPUT STATEMENT 


OUTPUT # <channel-number > 


G18148 


<expression > 
TAB (<index> ) 


G18066 


OVERLAY COMMAND 


-OVERLAY $i 


G18149 

PACK NAME 

ee <BASIC-file-name > + 
“© <up to 10 blanks > » 

G18075 


PASSWORD COMMAND 


PASSWORD <old-password > <new-password > <new-password > —— --_________| 


Pi FUNCTION 


SS SS SS SS 


POS FUNCTION 


POS ( <string-exp > > clea Re a al } ——— 


G18087 


G18150 


G18151 
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PRINT STATEMENT 


PRINT 


<expression > 
TAB ( <index> ) 


G18053 


PRINT USING STATEMENT 


PRINT USING <image > <expression > 


G18054 


~PROMPT COMMAND 
. PROMPT SSS 


G18152 


RAD FUNCTION 
RAD ( <numeric-expression > ) Sa 


G18153 
RANDOMIZE STATEMENT 


RANDOMIZE SS 


READ STATEMENT 


G18010 


G18047 
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RELATIONAL EXPRESSION 


ee eee <exp > —— / es 
NOT ( <relational-expression > ) 


ee Lage) 
OR NOT ( < relational-expression > ) 


REM FUNCTION 


G18031 


REM ( <numeric-expression > » <numeric-expression > ) S| 


REM STATEMENT 


REM < remark-string > SS. 


RENAME COMMAND 


RENAME <BASIC-file-name1 > | eres | ae <BASIC-file-name2 > ————| 
ON <pack-name > AS 


G18154 


G18002 


G18089 


RENUMBER COMMAND 


RENUMBER 


<line-number-range > STEP <increment > 


1 AT <line-number > 
G18090 


RESTORE STATEMENT 


RETURN STATEMENT 


RETURN SSS SSS SSS 


G18155 


G18034 
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RND FUNCTION 


SSS = — 


G18156 


RUN COMMAND 


<line-number > _ 


G18091 1 PRINT 


RUN 


.RY COMMAND 


AVS a | =a 


G18157 


SAVE COMMAND 


Re le ties eet Ei J 
AS <BASIC-file-name > ON <pack-name > FOR CANDE 


G18092 


SCRATCH COMMAND 
eran ee — | 
<BASIC-file-name > 
oe <pack-name > 


SCRATCH STATEMENT 


SCRATCH ° <channel-number > —— ———__$?€?€—$$__$_$_______1 


G18093 


G18069 


SEC FUNCTION 


SEC ( <numeric-expression > ) — 


G18158 
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SELECT CASE STRUCTURE 


—— SELECT —— < expression> —— <eol> —> 


< constant> 


< constant> — TO 


< less-than-sign > 


< greater-than-sign> 


CASE ELSE —— <eol> 


SEQUENCE COMMAND 


—— SEQUENCE 


STEP —— < increment> 
AT 


< line-number> 


SGN FUNCTION 


SGN ( <numeric-expression > )) ————_——____________ 


G18159 


SIN FUNCTION 


SIN ( <numeric-expression > ) 


G18160 


SINH FUNCTION 


SINH ( <numeric-expression > ) $a 
G18161 


SOR FUNCTION 
SQR ( <numeric-expression > ) ——— -— 


G18162 
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SS COMMAND 


.SS <string> oo 
G18163 


ST COMMAND 


5 —— 
G18164 


STATEMENT LINE 


cae a 
< digit > < BASIC-language-statement > ——-____ ; “ 


G18000 
SSTATUSLINE COMMAND 


.STATUSLINE — SO 
G18165 


STEP COMMAND 
STEP —— 


G18094 
STOP STATEMENT 


STOP = | | — 
G18003 


STR$ FUNCTION 


STRS ( <numeric-expression > ) $$ 


STRING ASSIGNMENT STATEMENT 


LET < string-variable > ei = < string-expression > —SSSS SS 


G18166 


G18013 
STRING CONSTANT 
a > 
—— + < quoted-string-character > ” | 
G18011 
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STRING EXPRESSION 


a- 


< string-constant > a 


< string-variable > 


< string-function-ref > 


G18014 


STRING VARIABLE 
— at 


( < index > : < index > ) 


eee Tee TS 


G18012 


TAIL COMMENT 
—— < statement-line > a <exclamation-mark > < remark-string > | 


G18001 


TAN FUNCTION 


TAN ( <numeric-expression > ) ———-_____ -——_| 


G18167 


TANH FUNCTION 


TANH <numeric-expression > - — 


G18168 


TEACH COMMAND 


aad ee 
<command > 
G18095 


TIME FUNCTION 


a aE nT 


G18169 
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TIME COMMAND 


. TIME J 


G18170 


TIME$ FUNCTION 


TIMES 


—— 


G18171 


TITLE COMMAND 
TITLE <BASIC-file-name > | 


G18096 


TRACE STATEMENT 


— a ° «4 
OFF 


G18072 


UDIM 


UDIM ( <array-name > > <numeric-expression > ) - ————_ 


G18172 


USER COMMAND 


ciate (OE ee |i a ae | 
G18097 / < password > 


VAL FUNCTION 
VAL ( <string-expression > ) —— — 


G18173 


WALK COMMAND 


WALK se ees eee — 
[es <line-number > “7 


WHAT COMMAND 


WHAT SEU 
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WHERE COMMAND 


WHERE 


FROM 


CALLED 
G18100 


XREF COMMAND 
ae EF <variable-name > 
FIND <line-number > 


<line-number-range > 


<line-number-range > 


<user-defined-function > 


<delim > <string> <delim> 
G18101 
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APPENDIX E 
CHARACTER SETS 


Tables E-1 and E-2 list the character sets available to IBASIC for comparing strings and for computing 
values with the CHR$ and ORD functions. Table E-1 contains the STANDARD character set (ASCII). 
Table E-2 contains the NATIVE character set (EBCDIC). 


Hexadecimal representation is the standard convention for the 8-bit internal codes. Examples of the 
translation of these codes to the equivalent binary values follows. 


Table E-1. Standard BASIC Character Set (ASCID 


ORD 
Mnemonic Name 


Examples: 
Hex 
Number 8-Bit 
Pair Internal Code 

842 1 8421 
@39@ = 0011 1001 
@BE@ = 1o01t 21110 
@0F@ = 0000 1111 
Ts 
Position | Code | Graphic 

0 00 

1 01 

2 02 

3 03 

4 04 

2 05 

6 06 

7 07 

8 08 

9 | 09 

10 OA 

11 0B 

12 0c 

13 0D 

14 OE 

15 OF 

16 10 

17 1] 

18 12 

19 13 

20 14 

21 15 

22 16 

23 17 

24 18 

25 19 
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NUL 
SOH 
STX 


Null 

Start of heading 
Start of text 

End of text 

End of transmission 
Enquiry . 
Acknowledge 

Bell 

Backspace 
Horizontal tab 

Line feed 

Vertical tab 

Form Feed 
Carriage Return 
Shift Out 

Shift In 

Data link escape 
Device control 1 
Device control 2 
Device control 3 
Device control 4 
Negative Acknowledge 
Synchronous idle 
End of transmission block 
Cancel 

End of medium 
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E-2 


Ordinal 
Position 


Table E-1. Standard BASIC Character Set (Cont) (ASCII) 


OMIUNDWRWNHO~-: 


aK TOMMOAWFAOCVIAs = 


SUB 


Hex 
Code | Graphic Sao Name 


Substitute 

Escape 

File separator 
Group separator 
Record separator 
Unit separator 
Space 
Exclamation mark 
Quotation mark 
Number sign 
Dollar sign 
Percent sign 
Ampersand 
Apostrophe 

Left parenthesis 
Right parenthesis 
Asterisk 

Plus sign 

Comma 

Minus sign, hyphen 
Full stop, period, or decimal point 
Solidus 

Zero 

One 

Two 

Three 


. Four 


Five 

Six 

Seven 

Eight 

Nine 

Colon 
Semicolon 
Less than sign 
Equals sign 
Greater than sign 
Question mark 


At sign 


Upper-case 
Upper-case 
Upper-case 
Upper-case 
Upper-case - 
Upper-case 
Upper-case 
Upper-case 
Upper-case I 
Upper-case J 


Tom mmMooaw > 
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Table E-1. Standard BASIC Character Set (Cont) (ASCID 


Ordinal | Hex ORD 
Position | Code| Graphic | Mnemonic Name 


75 4B K Upper-case K 
76 4C L Upper-case L 
77 4D M Upper-case M 
78 4E N Upper-case N 
79 4F O Upper-case O 
80 50 P Upper-case P 
81 51 | Q Upper-case Q 
82 52 R Upper-case R 
83 53 S Upper-case S$ 
84 54 Ay Upper-case T 
85 55 U Upper-case U 
86 56 V Upper-case V 
87 57 WwW Upper-case W 
88 58 x Upper-case X 
89 59 Y Upper-case Y 
90 5A Z Upper-case Z 
91 5B [ Left bracket 
92 5C NS Reverse solidus 
93 5D ] Right bracket 
94 SE A Circumflex accent 
95 SF 4, = UND Underline 
96 60 > GRA Grave accent 
97 61 a LCA Lower-case a 
98 62 b LCB Lower-case b 
99 63 C LCC Lower-case c 
100 64 d LCD Lower-case d 
101 65 e LCE Lower-case e 
102 66 f LCF Lower-case f 
103 67 g LCG Lower-case g 
104 68 h LCH Lower-case h 
105 69 i LCI Lower-case 1 
106 6A j LCJ Lower-case j 
107 6B k LCK Lower-case k 
108 6C ] LCL Lower-case | 
109 6D m LCM Lower-case m 
110 6E n LCN Lower-case n 
111 6F 0) LCO Lower-case o 
112 | 70 p LCP Lower-case p 
113 71 q LCQ Lower-case q 
114 72 r LCR Lower-case r 
115 73 S LCS Lower-case §$ 
116 74 t LCT Lower-case t 
117 75 u LCU Lower-case u 
118 76 Vv LCV - Lower-case v 
119 7 w LCW Lower-case w 
120 78 X LCX Lower-case x 
121 79 y LGY Lower-case y 
122 7A z LCZ Lower-case Z 
123 7B { LBR Left brace 


1152105 


E4 


B 1000 Systems Interactive BASIC (IBASIC) Language Manual 
Character Sets 


Table E-1. Standard BASIC Character Set (ASCII) (Cont) 


Ordinal Hex ORD 
Position | Code | Graphic | Mnemonic Name 


124 7¢ | VLN Vertical line 
125 7D } RBR Right brace 
126 7E je TIL Tilde 

127 7F DEL Delete 


Table E-2. Native BASIC Character Set (EBCDIC) 


Ordinal Hex ORD 
Position | Code | Graphic | Mnemonic Name 
0 00 


NUL Null 

| 01 SOH Start of heading 
2 02 STX Start of text 

3 03 ETX End of text 

4 04 

5 05 HT Horizontal tab 

6 06 

7 07 DEL Delete 

8 08 

9 09 

10 OA 

11 0B VT Vertical tab 

12 OC FF Form feed 

13 0D CR Carriage return 
14 OF SO Shift out 

he) OF SI Shift in 

16 10 DLE Data link escape 
17 11 DCI Device control | 
18 12 DC2 Device control 2 
19 13 DC3 Device control 3 
20 14 

21 15 NL New line 
ae 16 BS Backspace 

23 17 

24 18 CAN Cancel 

25 19 EM End of medium 
26 1A 
27 1B 

28 IC FS File separator 
fi, 1D GS Group separator 
30 IE RS Record separator 
31 IF US Unit separator 
32 20 

33 2 
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Table E-2. Native BASIC Character Set (Cont) (EBCDIC) 


Ordinal Hex ORD 
Position | Code | Graphic | Mnemonic Name 


34 22 

35 23 

36 24 

37 25 ' LF Line feed 

38 26 ETB End of transmission block 
39 2} ESC Escape 

40 28 

41 29 

42 2A 

43 2B 

44 2C 

45 2D ENQ Enquiry 

46 2E ACK Acknowledge 

47 2F BEL Bell 

48 30 

49 31 

50 32 SYN Synchronous idle 
5] 33 

a2 34 

53 35 

54 36 

55 37 EOT End of transmission 
56 38 

57 39 

58 3A 

59 3B 

60 3C DC4 Device control 4 
61 3D NAK Negative acknowledge 
62 3E 

63 3F 

64 40 SP Space 

65 4| 

66 42 

67 43 

68 44 

69 45 

70 46 

71 47 

72 48 

73 49 

74 4A [ Left bracket 

75 4B : " Full stop, period, decimal point 
76 4C < Less than sign 
Te 4D ( Left parenthesis 
78 4E + Plus sign 

79 4F | VLN Vertical line 

80 50 & Ampersand 

81 51 
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Table E-2. Native BASIC Character Set (Cont) (EBCDIC) 


Ordinal ORD 
Position Mnemonic Name 


82 $2 

83 53 

84 54 

85 ais, 

86 56 

87 57 

88 58 

89 $9 

90 SA ] Right bracket 

91 5B $ Dollar sign 

92 5C - Asterisk 

93 5D ) Right parenthesis 
94 SE : Semicolon 

25 5F A Circumflex accent 
96 60 ~ Minus sign, hyphen 
97 61 / Solidus 

98 62 

99 63 

100 64 

101 65 

102 66 

103 67 

104 68 

10S 69 

106 6A 

107 6B : Comma 

108 6C % Percent sign 

109 6D _ UND Underline 

110 6E > Greater than sign 
111 6F ? Question mark 
112 70 ! Exclamation mark 
113 71 

114 qe 

115 73 

116 74 

117 To 

118 76 

119 77 

120 78 

121 79 

122 TA : Colon 

123 7B # Number sign 

124 7C @ At sign 

125 7D : Apostrophe 

126 TE = Equals sign 

127 7F y Quotation mark 
128 80 

129 81 a LCA Lower-case a 
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Table E-2. Native BASIC Character Set (Cont) (EBCDIC) 


Ordinal Hex 
Position | Code | Graphic iceman Name 


130 b LCB Lower-case b 
131 a c ECE Lower-case ¢ 
132 84 d LCD Lower-case d 
133 85 e LCE Lower-case e 
134 86 f LCF Lower-case f 
135 87 g LCG Lower-case g 
136 88 h LCH Lower-case h 
137 89 i LCI Lower-case 1 
138 8A 

139 8B 

140 8C 

141 8D 

142 8E 

143 8F 

144 90 

145 91 j LCJ Lower-case j 
146 92 k LCK Lower-case k 
147 93 ] LCL Lower-case | 
148 94 m LCM Lower-case m 
149 95 n LCN Lower-case n 
150 96 oO LCO Lower-case 0 
151 97 p LCP Lower-case p 
152 98 q LCQ Lower-case q 
153 99 r LCR Lower-case r 
154 9A 

155 9B 

156 9C 

157 9D 

158 ) 

159 OF 

160 AO 

161 Al TIL Tilde 

162 A2 S LCS Lower-case $ 
163 A3 t LCT Lower-case t 
164 A4 u LCU Lower-case u 
165 AS Vv LCV Lower-case Vv 
166 A6 w LCW Lower-case w 
167 A7 x LCX Lower-case x 
168 A8& y LCY Lower-case y 
169 AQ Z LCZ Lower-case Z 
170 AA 

171 AB 

72 AC 

173 AD 

174 AE 

175 AF 

176 BO 

177 Bl 


1152105 


B 1000 Systems Interactive BASIC (IBASIC) Language Manual 
Character Sets 


Table E-2. Native BASIC Character Set (Cont) (EBCDIC) 


Ordinal ORD 
Position Graphic | Mnemonic Name 
178 B2 

179 B3 

180 B4 

18] BS 

182 B6 

183 B7 

184 B8 

185 B9 

186 BA 

187 BB | 

188 BC | 

189 BD 

190 BE 

19] BF 

192 CO { LBR Left brace 
193 Cl A Upper-case A 
194 C2 B Upper-case B 
195 C3 C Upper-case C 
196 C4 D Upper-case D 
197 C5 E Upper-case E 
[98 C6 F Upper-case F 
199 C7 G Upper-case G 
200 C8 H Upper-case H 
201 C9 I Upper-case I 
202 CA 

203 CB 

204 CC 

205 CD 

206 CE 

207 CF 

208 DO } RBR Right brace 
209 D1 J Upper-case J 
210 D2 K Upper-case K 
211 D3 L Upper-case L 
212 D4 M Upper-case M 
213 D5 N Upper-case N 
214 D6 O Upper-case O 
215 D7 P Upper-case P 
216 D8 Q Upper-case Q 
pai D9 R Upper-case R 
218 DA 

219 DB 

220 DC 

221 DD 

222 DE 

223 DF 

224 EO Ww Reverse solidus 
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Table E-2, Native BASIC Character Set (Cont) (EBCDIC) 


Ordinal ORD 
Position Graphic | Mnemonic 


Upper-case 
Upper-case 
Upper-case 
Upper-case 
Upper-case 
Upper-case 
Upper-case 
Upper-case 


N<xXS<CHY 
Nxx<e<cn4 


0 
l 
Z 
3 
4 
5 
6 
7 
8 
9 
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APPENDIX F 
EXTENSIONS TO BASIC 


The following extensions to the ANSI language are recognized only when the IBASIC program is 
executed with SW=W or with the initial parameter of DEBUG WW (refer to appendix C). The intent — 
of these extensions is to enable the writing of external intrinsic functions and subprograms in BASIC. 
A side effect of this extension is that while the IBASIC program is being executed with SW=W or 
an initial parameter of DEBUG WW, the intrinsic file it is using is inaccessible to any other copy of 
the IBASIC program. Therefore, it is desirable to have a separate copy of the intrinsic file (not the 
system copy) when it is desired to run in this mode. By default, the IBASIC program uses the interpre- 
ter named *IBASIC/INTERP. If it is desired to use some other interpreter (for example, for 
experimental purposes), the IBASIC program should be initiated with SW=W or AX DEBUG WW 
and FILE INTRINSICS NAME <your own interpreter name>. 


INTRINSIC STATEMENT 


The INTRINSIC statement is used to identify an intrinsic. 


INTRINSIC <jntrinsic-name > _-.. - t.. 
( <parameters > ) <ocal-variable-list > 


Semantics: 


Syntax: 


G18174 


The INTRINSIC statement must be the first statement of an intrinsic function. The <intrinsic-name > 
must match an entry in the intrinsic function table in the compiler and the <parameters> must match, 
in type and number, the parameters of this entry. The <local-variable-list > may be any valid BASIC 
simple variable (up to seven variables). The statements that follow may only reference those names that 
are either in the <parameters> or in the <local-variable-list > (enforced at COMPILE or RUN time). 
If the intrinsic being defined is run, it supercedes the intrinsic in the intrinsic file. The external intrinsic 
file is only changed after a COMPILE INTRINSICS command is executed. While the local intrinsic 
is being executed, the <parameters> and the <local-variable-list > are global. The compilation pro- 
cess and ensuing intrinsic call process “localize” the references. 


The parameters may be arrays which are passed by reference. Array parameters are only allowed if 
the intrinsic requires them and are denoted by appending a left parenthesis "(” to the array name which 
is passed. Within the intrinsic, the array may be referenced with one or two subscripts (with obviously 
bad results if a 2-dimensional array is accessed with one subscript, and vice versa). The special function 
NDIM should be used to ensure correct usage. Refer to Special Functions in this section. 
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Within the intrinsic definition the following statements are invalid: 


Array references (unless they are passed as parameters) 
CHAIN 

CLOSE 

DATA 

DEF (and any FN references) 
DIM 

END 

FNEND 

INPUT 

LINPUT 

MARGIN 

MAT 

OPTION 

READ 

RESTORE 

SCRATCH 

STOP 

SUB 

SUBEND 

SUBEXIT 


Example of an INTRINSIC statement: 
INTRINSIC SIN (A) X,Y,Z | 
INTEND STATEMENT 


The INTEND statement identifies the end of an intrinsic and returns the value of the intrinsic. 


INTEND —T. pala ial a aaa 
<array-name > ( : 


Semantics: 


Syntax: 


G18175 


The INTEND statement must be the last statement in the intrinsic. Its function is to return the value 
of the intrinsic or to return an array name to the calling code. There must be a corresponding INTRIN- 
SIC statement. Normal BASIC statements or another INTRINSIC statement may follow. 
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ERROR STATEMENT 


The ERROR statement allows error messages to be displayed. 


Syntax: 


ERROR ( Ie Ik > <integer > ). SS 


NONFATAL 
G18176 


The ERROR statement causes the displaying of an error message which is the <integer>th one in 
the list of error messages in the compiler. If NONFATAL is specified, execution continues. If FATAL 
is specified, intrinsic, and thus program (or command) execution, is terminated immediately. The fol- 
lowing error numbers are currently used with the intrinsics: 


Error 
Number Meaning 
14 Numeric overflow 
15 Numeric underflow 
102 Zero argument 
103 Negative argument 
104 Negative number to nonintegral power 
105 Argument too big, inaccurate result 
106 Argument out of range 
107 Both arguments zero 
108 Zero to negative power 
133 Square matrix required 
134 Array dimension mismatch 


SPECIAL FUNCTIONS 

The following special functions are available with the extensions to BASIC. 
NDIM(X) 

Returns the number of dimensions of array X. 

MSV(X) 


Returns the number of elements that were originally defined for array X, whether the array was explic- 
itly or implicitly dimensioned. Dynamic redimensioning does not change this value. 


MXI 


Returns the maximum integer that the current numeric representation may hold precisely. 


RDUC(X) 


Returns the value of X, such that .5 <= X < 1, as if X were divided or multiplied by 2 repetitively 
until X is in that range. 


1152105 F-3 


B 1000 Systems Interactive BASIC (IBASIC) Language Manual 
Extensions to BASIC 


XPND(X, Y) 
Returns the value of X as if multiplied by 2**Y. 
XPON(X) 


Returns the power to which the value 2 must be raised so that X/2**XPON(X) results in .5 <= X 
<1. 


XTIM 


Returns the current cpu time usage of IBASIC in tenths of a second. 
SPECIAL VARIABLE NAMES 


The following special variables can be used when the extensions are enabled. 


DET 


When used as a destination in an assignment statement, DET assigns a value to the function DET 
(no parameters). 


RANI, RAN2, and RAN3 
May be used as sources or destinations. These variables are initialized to particular values at the 


beginning of any particular RUN of a program and are intended for use by the RND intrinsic 
function. 


COMPILE COMMAND 


The COMPILE command compiles intrinsics. 


Syntax: 


COMPILE —--——— INTRINSICS SS SSS See 


G18178 


Semantics: 


The COMPILE command is used to convert the locally defined intrinsic function to a form which can 
be put into the external intrinsic file. This code is then written to the intrinsic file, overwriting whatever 
code may already have been compiled for the function or functions being defined locally. The local 
definition of the function is used until the local definition is deleted from the workfile. If a syntax 
error exists in the workfile, nothing is written to the external file, and Command mode invocations 
of the intrinsic function yield an "invalid op code” run-time error message. 
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EXTERNAL INTRINSICS 


The following intrinsic functions are defined as external intrinsics and are maintained in a ‘compiled’ 
form in the intrinsics file: 


ACOS 
ASIN 
ATN 
ATN2 
COs 
COSH 
COT 
CSC 
EXP 
LOG 
LOG10 
LOG2 
RND 
SEC 
SIN 
SINH 
SQR 
TAN 
TANH 
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INDEX 


-DEBUG Command D-4 

-DUMP Command D-~5 

-FREEZE Command D-6 

eHELLO Command D-7 

-HINTS Command D-7 

~-LOCAL Command D-10 

~-LOG Command D-10 

<optional wait limit> Syntax: B-2 
A More Complex Example 2-5 

ABS Function D-]l 

ABS(X) 4-6 

ACOS Function D-1l 

ACOS(X) 4-6 

ANGLE Function D-] 

ANGLE( X,Y) 4-6 

Array Declarations 6-1 

Array 1/0 9-17 

Array Input 9-17 

Array Output 9-20 

Arrays, Numeric Manipulation 6-3 
Arrays, String Manipulation 6-13 
ASIN Function D-1l 

ASIN(X) 4-6 

Assignment Statement For Multiple~Statement Functions 8-4 
Assignment Statement, Numeric 4~3 
Assignment, String Statement 5-3 
ATN Function D-l 

ATN(X) 4-6 

Automatic Log-Off B-3 

BACKSPACE Command 12-1, D-1l 
Basic Commands 11-25 

BASIC File Name 11~2 

Basic File Name D-1 

Basic Statement Entry 11-26 
Block IF Structure 7-10 

Block, IF Structure D-7 

BREAK Statement 10-l, D~2 
Bridges 1-4 

BRK Command D-~2 

BYE Command 11-4 

BYE Statement D-2 

CANDE, Execution Under B~-2 

CASE Command 12-1, D-2 

CEIL Function D-2 

CEIL(X) 4-6 

CHAIN Statement 8-4, D-2 
Character Set 3-1 

CHRS Function D-2 

CHRS(M) 5-5 

CLOSE Statement 9-25, D~2 
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Command Mode 2-8 

Command, .DEBUG D-~4 

Command, .DUMP D-5 

Command, .«~FREEZE D-6 
Command, .HELLO D-7 

Command, .HINTS D-~/ 

Command, .~LOCAL D-~10 
Command, .LOG D-10 

Command, BACKSPACE 12-1, D-1 
Command, CASE 12-1, D-2 
Command, CONTINUE D-2 
Command, CONTINUOUS 12-1, D-3 
Command, DEBUG 12-1 

Command, DELETE D-~4 

Command, DUMP 12-1 

Command, EDIT D-~5 

Command, FILE D-5 

Command, FIX D-6 

Command, FREEZE 12-1 
Command, GET D-6 

Command, HELLO 12-1, D-~7 
Command, HINTS 12-2 

Command, LIST D-9 

Command, LOCAL 12-2 

Command, LOG 12-2 

Command, MAKE D-10 

Command, OL 12-2 

Command, OVERLAY 12-2 
Command, PROMPT 12-2 
Command, RY 12-2 

Command, SS 12-2 

Command, ST 12-2 

Command, STATUSLINE 12-2 
Command, TIME 12-3 

Commands, Basic 11-25 
Commands, END 11-26 
Commands, STOP 11-26 
Commands, System 11~4 
Considerations, Network Controller C-l 
Constants, Numeric 4-] 
Constants, String 5-1 
CONTINUE Command 11-5, D-2 
CONTINUOUS Command 12-1, D-3 
Control Statements 7-3 
Controller, Network Considerations C-] 
COS Function )-3 

COS(X) 4-7 

COSH Function D-3 

COSH(X) 4-7 

COT Function D-3 
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COT(X) 4-7 

CSC Function D-3 

CSC(X) 4-7 

DATA Statement 9-1, D-~3 

DATE 4-7 

DATE Function D-3 

DATES 5-6 

DATES Function D-3 

DEBUG Command 12-1 

DEBUG Statement 10-1, D-3 
Decision Structures /~9 
Declarations, Array 6-1 
Declarations, String 5-9 

DEF Statement D-~4 
Definitions, Syntax 11-~l 

DEG Function D-~4 

DEG(X) 4-7 

DELETE Command 11-6, D-~4 

DET Function 4-7, D-4 

DIM Statement D-~4 

DIM Statement Array Size Declaration 6-1 
DIM Statement String Size Declaration 5-9 
DO LOOP Structure 7-8 

DO Statement D-4 

DOT Function 6~6, D-5 

DUMP Command 12-1 

Dynamic Memory C-4 

e~format 9-14 © 

EDIT Command 117-6, D-5 
Editing a Program 2~4 

END Command 11~26 

END Statement 3~3, D-5 
End~of-Line Conditions 9-10, 9-15 
Entry of Basic Statements 11-26 
EPS 4-8 

EPS Function D-5 

Exception Statement 9-30, D-5 
Executing a BASIC Program 2-3 
Executing IBASIC 2-1 
Execution Under CANDE B-~2 
Execution Under SMCS b-l 
Execution With No MCS B-2 
EXIT Statement D-5 

EXP Function D-5 

EXP(X) 4-8 

Expressions, Numeric 4-4 
Expressions, Relational /~] 
Expressions, String 5-4 
f~format 9-13 

File Access 9-20 
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FILE Command 117/, D-5 

File Control Statements 9-31 
File I/O Statements 9-22, 9-25 
File Input 9-25 

File INPUT Statement 9~26 

File LINPUT Statement 9~26 
File MAT INPUT Statement 9-2/7 
File Name, Basic D-~l 

File Output 9-28 

File RESTORE Statement 9-31 
FIND Command 11-8 

FIX Command 11-8, D-6 

FNEND Statement D-6 

FOR NEXT Structure 7-6 

FOR Statement D-6 

Formatted Numeric Output 9-13 
Formatted Output 9-10 
Formatted String Output 9-15 
FP Function D-6 

FP(X) 4-8 

FREEZE Command 12-1 

Function, ABS D-] 

Function, ACOS D-1l 

Function, ANGLE D-l 

Function, ASIN D-l 

Function, ATN D-l 

Function, CEIL D-2 

Function, CHRS$ D-2 

Function, CLOS D-3 

Function, COSH D-3 

Function, COT D-3 

Function, CSC D-3 

Function, DATE D-3 

Function, DATES D-3 

Function, DEG D- 
Function, DET D- 
Function, DOT D-~ 
Function, EPS D- 
Function, EXP D- 
Function, FP D-6 
Function, INF D-8 
Function, INT D-8 
Function, IP D-8 
Function, LDIM D-9 
Function, LEN D-~9 
Function, LOG D-10 
Function, LOGI1O D-10 
Function, LOG2 D-10 
Function, MAT INV D-11 
Function, MAT TRN D-13 
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Function, MAX D-13 

Functions, Intrinsic NumerIC 4-5 
Functions, String-Related 5-5 
Functions, User-Defined 8-1 

GET Command 11-9, D-6 

GOSUB and RETURN Statements 7-3 
GOSUB Statement D-6 

GOTO Statement 7-3, D-6 
Hardware Requirements C-4 

HELLO Command 11-10, 12-1, D-7 
HINTS Command 12-2 

i-format 9-13 

IBASIC Use 2-1 

IF Statement 7-9, D-7 

IF Structure (Block) D-7 

IMAGE Statement N-7 

Images 9-11 

INF 4-8 

INF Function D-8 

Initial Parameters C-2 

Input Reply D-8 

INPUT Statement 9-3, D-8 

Input, Program~Internal 9-1 
INQUIRE Statement 9-32, D-8 

INT Function D-8 

INT(CX) 4-8 

Interactive BASIC System Considerations C-2 
Intrinsic Numeric Functions 4-5 
Intrinsic String 5-5 

IP Function D-8 

IP(X) 4-9 

Key, Use of SPCFY 11-27 

LDIM Function D-9 

LDIM(A,X) 4-9 

LEN Function D-9 

LENCAS) 5-6 

Limit, Run-Time B-3 

LINE INPUT (LINPUT) Statement 9-5 
Line Number D-9 

Line Number Range 11-1, D-9 
LINPUT Reply D-9 

LINPUT Statement D-9 

LIST Command 11-ll, D-9 

LOCAL Command 12-2 

LOG Command 12-2 

LOG Function D-10 

LOG(X) 4-9 

Log-Off, Automatic B-3 

LOG1O Function D-10 

LOGIO(X) 4-9 
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LOG2 Function D-10 

LOG2(X) 4-9 

LOOP Statement D-~10 

Loop Structures 7-6 

Loops 1-3 

LWRCS$(AS$) 56 

MAKE Command 117~12, D-10 

Making a File 2-2 

Manipulation, Numeric Array 6-73 
Manipulation, String Array 6-13 
Manual, Purpose of 1-l 

MARGIN Statement 9-16, D-10 

MAT Addition Statement 67-3, D-10 

MAT Assignment Statement 6-5, 67-13, D-1l 
MAT CON Statement 67-5, D-ll 

MAT IDN Statement 6-7, D-l1l 

MAT INPUT Statement 9-19, D-11 

MAT INV Function 6-8, D-1l 

MAT Multiplication Statement 6-8, D-12 
MAT Multiplicaton Statement D-1l 

MAT NULS Statement 6-14, D-12 

MAT OUTPUT Statement 9-29, D-12 

MAT PRINT Statement 9-20, D-12 

MAT READ Statement 9-18, D-12 

MAT Scalar Multiplication Statement 6-10 
MAT Subtraction Statement 6-10, D-12 
MAT TRN Function 6-11, D-13 

MAT ZER Statement 6-12, D-13 

MAX Function D-13 

MAX(X,Y) 4-10 

MCP File Name 117-3, D-13 

MCS, Execution with no B-2 

MERGE Command 11-12 

MIN( X,Y) 4-10 

MOD(X,Y) 4-10 

MSV(X) F-3 

Multiple-Statement Functions 8-2 

MXI F-3 

NDIM(X) F-3 

Network Controller Considerations C-l 
Number, Line D-9 

Numeric Array Manipulation 6-3 
Numeric Assignment Statement 4-3 
Numeric Constants 4-1 

Numeric Expressions 4-4 

Numeric Intrinsic Functions 4-5 
Numeric Variables 4-2 

ODT Operation C-4 

OL Command 12-2 

ON GOSUB and RETURN Statements 7-5 
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ON GOTO Statement 7-~4 

OPEN Statement 9~20 

OPTION Statement for Arrays 6-73 
OPTION Statement for Strings 5-9 
Optional Items 1-3 

ORD( AS) 5-6 

Organization of Manual 1-1 
OUTPUT Statement 9-28 

OVERLAY Command 12-2 

Pack Name 11-73 

PASSWORD Command 11-13 

PI 4-10 

POS(CAS,BS) 5-7 

POS(AS$,BS$,M) 5-7 

Print Separators and TABs 9-8 
PRINT Statement 9-6 

PRINT USING Statement 9-10 
Printing Numeric Values 9-7 
Printing String Values 9-7 
Priority C-~4 

Program Debugging Commands 2-7 
Program Documentation 3-1 
Program~Internal Input 9-1] 
PROMPT Command 12-2 

Pseudo BREAK Feature 11-14 
Purpose of Manual 1-1 

RAD(X) 4-10 

Railroad Diagrams 1-2 
RANDOMIZE Statement 4-12 
Range, Line Number D-9 
RDUC(X) F-3 

READ Statement 9-2 

Recovery 11-27 

Related Documentation 1-5 
Relational Expressions 7-1 
REM Statement 3-2 

REM( X,Y) 4-10 

RENAME Command 11-14 

RENUMBER Command 11-15 

Reply, Input D-8 

Reply, LINPUT D-9 

Required Items 1-~3 

RESTORE Statement 9-3 

RND 4-11 

RUN Command 11-16 

Run-Time Limit B-3 

RY Command 12-2 

SAVE Command 11-17 

SAVE, SCRATCH, and BYE Commands 2~8 
SCRATCH Command 11-18 
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SCRATCH Statement 9-31 

SEC(X) 4-11 

SELECT CASE Structure 7-11 
SEQUENCE Command 11-19 

SGN(X) 4-11 

SIN(X) 4-11 

Single-Statement Functions 8-1] 
SINH(X) 4-11 

SMCS, Execution Under B-l 
Software Requirements C-4 

Some IBASIC Commands for Debugging 2-7 
SPCFY Key Use 11-27 

SQR(X) 4-11 

SS Command 12-2 

ST Command 12-2 

Statement Lines 3-1 

Statement, BREAK D-2 
Statement, BYE D-2 

Statement, CHAIN 8-4, D-2 
Statement, CLOSE D-~2 
Statement, DATA D-3 

Statement, DEBUG D-3 
Statement, DEF D-~4 

Statement, DIM D~4 

Statement, DO D-4 

Statement, END D-5 

Statement, Exception D-5 
Statement, EXIT D-5 

Statement, FNEND D-6 
Statement, FOR D-6 

Statement, GOSUB D-6 
Statement, GOTO D-6 

Statement, IF D~7 

Statement, IMAGE D-7 
Statement, INPUT D~8 
Statement, INQUIRE D-8 
Statement, LINPUT D-9 
Statement, LOOP D-~10 
Statement, MARGIN D-~10 
Statement, MAT Addition D-10 
Statement, MAT Assignment D-ll 
Statement, MAT CON D-1ll 
Statement, MAT IDN D-1ll 
Statement, MAT INPUT D-ll 
Statement, MAT Multiplication D-ll, D-12 
Statement, MAT NULS D-12 
Statement, MAT OUTPUT D-12 
Statement, MAT PRINT D-12 
Statement, MAT READ D~12 
Statement, MAT Subtraction D~12 
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Statement, MAT ZER D-13 
Statement, Numeric Assignment 4-3 
Statement, String Assignment 5-3 
Statements, Basic Entry 11-26 
Statements, BREAK 10-1 
Statements, Control 7-3 
Statements, DEBUG 10-1 
Statements, File I/0 9-22 
Statements, RANDOMIZE 4-12 
Statements, TRACE 10-2 
STATUSLINE Command 12-2 

STEP Command 11-19 

STOP Command 11-26 

STOP Statement 3-2 

Stopping Execution of a BASIC Program 2-4 
STRS(X) 5-8 

String Array Manipulation 6-13 
String Assignment Statement 5-3 
String Constants 5-1 

String Declarations 5-9 

String Expressions 5-4 

String Variables 5-2 
String-~Related Functions 5-5 
Strings, Intrinsic 5-5 
Structures, Decision /-9 
Structures, Loop 7-6 

Switch Values C-5 

Syntax Conventions 1-2 

Syntax Definitions 11-1 

Syntax Rules, General 3-3 
System Commands 11-~4 

System, Interactive BASIC Considerations C~2 
Tail Comments 3-2 

TAN(X) 4-11 

TANH(X) 4-11 

TEACH Command 11-20 

Terminal 1/0 9-3 

Terminal Input 9-3 

Terminal Output 9-6 

TIME 4-11 

TIME Command 12-3 

TIMES 5-8 

TITLE Command 11-20 

TRACE Statement 10-2 

UDIM(A,X) 4-12 

UPRCS(AS) 5-8 

Use of SPCFY Key 11-27 

USER Command 11-21 

User~Defined Functions 8-1 
Usercode Considerations C-5 
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Using the EXECUTE Program Control Instruction B-l 
Using the SIGN ON Command B-] 
VAL(AS) 5-8 

Variables, Numeric 4~2 
Variables, String 5-2 

WALK Command 11-21 

WHAT Command 11-22 

WHERE Command 11~22 

Workfile Considerations C~5 
XPND(X,Y) F-4 

XPON(CX) F~4 

XREF or FIND Command 11~24 
XTIM F-4 
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